SYSGOP PAGE 1 DATES 08/1S/99 


000 1 





NAM 

SYSCOP 

DECK- ID N77 HSOS 5.0 

SUMHAPY-110N770Q001 

QGD2 





MASS 

STORAGE OPERATING SYSTEM VERSION 5.0 


N7700002 

OQ03 





SMALL SYSTEMS DIVISION, LA JOLLA, CALIFORNIA 


N770CGQ3 

00 0 4 





COPYRIGHT CONTROL DATA CORPORATION 1976 


N770 0004 

ODD 6 





SYSTEM CHECKOUT 

PROGRAM - MAIN 


N7700006 

0 0 07 





EXT 

SYSSEG 

ORDINAL FOR CHECKOUT SEGMENTS 


N77C0QG7 

0^0 8 





EXT 

COSOPS 

STARTING SECTOR OF IMAGE 

»^MSOS 

4. l»^M77u00D8 

0 00 9 

0 

0 

EA 


EO.U 

ADI5P {$EA) , 

7EROT$22) 


N7700009 


0 

0 

22 







QQIO 

0 

0 

05 


EOU 

CP(3) 

PRIORITY LEVEL OF PROGRAM 


N770001G 

0011 

0 

0 

60 


EQU 

BL0CK(96) 

LENGTH OF SECTOR 


N77Q0011 

0012 

0 

0 

01 


EQU 

LCIT 

NO. OF BLOCKS PER SEGMENT ISECTORS) 

N7700 Q12 

0013 

0 

0 

60 


EQU 

SEGSIZ( L«^8LOCK5 


N7700013 

0014 

0 

0 

OF 


EQU 

ASECC15 ) 

WORD IN AUTOLOAD SECTOR WITH 

IMAGE SEC. 

N770 0 014 

0015 

0 

rt 

0 

n 

01 


EQU 

LDA tl) ,CON(3) ,LST (5) ,WRT(7) ,ANS 19) , AT A 111), 

CNS(13 ),GMS 

U5) N77G0015 


0 0 03 
0 0 05 
0 0 07 
0 0 09 
OOOB 
GOOD 
OOOF 


16 

0011 

EQU 

M0PU7) 


N770a016 

17 

0013 

EQU 

CMP(19) 


’^’^MSOS 4. DN770 0 017 

19 

0000 P 

EQU 

CKOUT (9^ ) 

START OF THE C/0 PROGRAM 

N77Q0019 

20 POOOO 

5830 HERE 

RTJ» 

TRVTBC 


N77Q0020 


SYSCOP 


PAGE 
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DATE; 08/19/99 


0Q22 

0023 

0024 


00 01 P 


V- 


EQU SEGMNTI^) N7700Q22 

SET UP SEGMENT- PART OF EXEC-IT IS NOT READ IN AS A SEGMENT N7700023 
AREA IS USED TO READ IN SUBSEQUENT SEGMENTS N7700Q24 


002 7 
002B 

0029 

0030 

0031 

0032 

0033 

0034' 

0035 

0036 

0037 

0038 

0039 

0040 

0041 

0042 

0043 


POOOl 
P0 002 
P0003 
P00 04 
P000 5 
P00Q6 
PD007 
P0 008 
P0 009 
POQOA 
PG OOB 
POOOC 
POOOD 
POOOE 
POOQF 
PGOIG 
POQll 
PC 012 
P0013 
P0014 
P0015 

pooie 


00 00 
EOOO 
FEES 
FOFF 
4800 

0115 
COOO 

0116 
0834 
68 0 0 
0105 
EOOO 
7FFF 
FQEB 
C206 
6360 
660 0 
0095 
EQOO 
FFOB 
0A05 
5105 


SETUP 


P0017 E0E9 


NUM 

LOQ 

ADQ- 

STQ 

LDA 

AAQ 

STA 


0 

=X(CKOUT-XFERTB) GET THE STARTING ADDRESS OF C/0 PROG. 
I 

FILER 

=XCAL€XT-CKOUT 


A 

CALLi-2 


LDQ =XSTSSEG 


SET UP ABSOLUTE CALL COMPLETION 
FIND SEGMENTS 


ADQ- 

LCA- 

STA--«^ 

STA 

LOQ 

ENA 

RTJ- 


$EB 

6,Q 

LSB 

MESSIH 


LSB OF MASS SEG SECTOR 
FOR MESSAGES 
XIINTMES-XFERTBI 


LINTMS 

LSTtI 


LDQ- $E9 


0044 

P0D18 

C204 



LDA- 

4,Q 

0045 

P0Q19 

6800 



STA 

AUTOIM 


POOIA 

0 0 8C 


. 



0046 
0 0 47 

POOIB 

COOO 

X 

If- , , 

LDA 

=XC080PS 


POOIC 

7FFF 

X 




0048 

POOlO 

5103 



RTJ- 

CON, I 

0049 

POOIE 

6810 



SJA* 

IMGSEC 

0050 

POOIF 

4810 



SIQ* 

IMGSEC*-! 

0051 

P0020 

£0 00 



LDQ 

= Xi LOCMES 


P0021 

FF12 




0052 

P0022 

3AOO 



ENA 

LLOGMS 

0053 

P0023 

5105 



RTJ- 

LST,I 

0054 

P0024 

0 8 44 



CLR 

A 

0055 

PQ025 

630A 



STA^ 

SETUP-1 

0056 

PC026 

18 42 



JMP* 

FR01 

0057 

P00Z7 

0000 


SETTOP 

NUM 

0 

0058 




15?^ 



0059 






MESSAGES 

0060 







0061 

PQ028 

0000 


INTHES 

NUM 

0 

0062 

P0029 

5359 



ALF 

. , SYSCOP ; 


P002A 

5343 






PRINT- INITIAL MESSAGE 

ADDS OF EX. COMMUNICATIONS REGION 

AODR OF CORE IMAGE 

SAVE AUTOLOAD IMAGE SECTOR 


GET STARTING SECTOR 
CONVERT TO ASCII 


OUTPUT LOCATION OF IMAGE 

START WITH SEG ZERP 

BY PASS INCREMENTING SEGMENT 


INITIAL MESSAGE 


»»MSOS 

»»MSOS 

♦»MSOS 


-^^MSOS 4- 


N7700027 

N7700028 

N7700 029 
N770003D 

N7700031 

N7700032 
N7700 033 

N7700034 

N770QQ35 

N7700036 

N770Q03F 

N7700Q38 

N7700Q39 

N770 Q040 
N7700041 
N770QD42 
4. SN7700043 
4. ON77G0044 
4. 0N7700Q45 

N770 0046 
N7700047 

N7700048 

N7700049 

N77Qa050 

:1^»N7700051 

N7700052 

N7700053 

N7700Q54 

N7700055 

N7700Q56 

N7700057 

N770a056 

N7700059 

N7700060 

N7700061 

N7700062 


SYSCOP 
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date: 08/19/99 



P002B 

4F50 





P002C 

2053 





P002D 

5441 





P002E 

5254 




0053 


00 06 , 



EQU 

006 A 






0065 

PD02F 

0000 

LOCME 

S 

NUM 

0066 

P0030 

4940 



ALF 


P0031 

4147 





P0Q32 

4520 





P0033 

53 54 





P0034 

4152 





P0D35 

5^20 





P0036 

5345 





P0037 

4354 





P0038 

4F52 





P0039 

20 49 





P003A 

5320 




005 7 

PG038 

2020 

IMGSE 

c 

ALF 


P003C 

2020 




0068 


GOOD 



EQU 

0 0-7 0 

P0030 

0000 

TRVTB 

c 

A DC 

0071 

P003E 

GOOD 



LOA 


PQ03F 

OllB 




0072 

P0Q4G 

88FG 



ADD^ 

0073 

P0041 

6800 



STA 


P0042 

0 0 79 




0074 

P0043 

C8F9 



LDA» 

0075 

POO 44 

6800 



STA 


P0D45 

00A8 




0076 

P0Q46 

5801 

ADRCA 

L 

RTJ^ 

00 77 

PG047 

0000 



ADC 

0078 

PC048 

C8FE 



LDA^ 

0079 

P0049 

092B 



INA 

Q080 

P0Q4A 

5820 



STA» 

0081 

OQ04B 

G8FB 



LDA’^ 

0082 

P0Q4C 

09B9 



INA 

0083 

P004D 

6821 



STA^ 

008 4 

PO 04E 

1824 



JMP» 

0086 

P004F 

0012 



BZS 


LINTHS{^-TNTH ES-11 
0 

.^MAGE START SECTOR IS. 


LOCATION MESSAGE 


N7700Q63 

N77Q0064 

N770Q065 

N7700066 


• ^ . 

LLOCHSI^-LOCMES-1') 


’^^HSOS 4.1’-N770Q067 
N770G 068 


0 ABSOLUTIZE ADDRESS FOR SEGMENTS 

=XXFERTB-HERE-1 

TRtfTBG 

TRVTB 

TRVrSC SAVE ABS ADDRESS OF SEGMENT 

SEGA0R USED BY CONVSf 

^+1 CALCULATE ABS AOBR OF CP AND 

0 BUFFER ADDRESS 

^-1 

CAlr AORCAL~l 

FR014-2 COMPLETION ADDRESS 

ADRGAL»-1 

SEGMNT-AORCAL-1 

FR0HK6 BUFFER ADDRESS 

GAl 


SEGFIL(SEGSlZ-=^+SEGMNn FILLER FOR REST OF 


♦’^MSOS 

4. 

»»MSOS 

4« 

»»MSOS 

4« 


.4. 

v’fMSOS 

4. 

»»MSOS 

4* 

♦=^MSOS 

4-. 

’■^MSOS 

4, 

♦’'‘MSGS 

4. 

»»MSOS 

4. 

^’^MSOS 

4*. 

S EG . 



N770 QQ70 
N770QQ71 

N770S072 

0N7700073 

QN778007^ 

0N773 0075 

0N77Q0 076 
0N770Q077 
ON7700078 
ON770QQ79 
0N7700060 
0N77SOa61 
ON7700082 
0N77000S3 
N7700084 


N7700086 


0088 


CELLS FOR SEGMENT COMMUNICATION —MUST FOLLOW SEGMENT AREA 


N77G0088 


0090 PD061 0000 


SEGOP NUM 


MESSAGE OPTION 


N7700090 


SYSGOP 
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date: 08/19/99 


u 

DQ91 P0Q62 

0092 P0063 

0093 P0064 

0094 P0065 
0G95 P0 066 
DD96 P0067 

o 
o 
o 
o 
o 

o • 
o 
o 
o 
o 
o 
o 
! o 
; O 


QODO 

SEGIFG 

NUH 

0 

0 OGQ 

SEGMFG 

NUM 

' 0 

oaoo 

SEGCl 

NUM 

D 

0000 

SEGC2 

NUH 

0 

GOOD 

SEGC3 

NUM 

0 

GOOD 

SEGC4 

NUM 

0 


INTIAL IMAGE FLAG 
MAIN MESSAGE OUT FLAG 


N7700091 

N7700092 

N7700093 

N77Q0094 

N7700095 

N7700096 


C) 

□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


SYSCOP 


PAGE 


5 


DATE? 03/19/99 


0098 

0099 

0100 
OlO 1 




FETCH SECTOR ON WHICH THE FIRST CHECKOUT SEGMENT STARTS 
AND COMPUTE THE AUORESS OF THE SEGMENT BUFFER. IF NO 
FURTHER SEGMENTS REMAIN TO BE PROCESSED, EXIT TO THE 
DONE ROUTINE. OTHERWISE INPUT SEGMENT INTO BUFFER. 


N7700096 
N770 0 099 
N77001QO 
N770ai01 


0103 

0103 

P0068 

54F4 


FRDi 

0103 

P0069 

0 803 



0103 

P006A 

0 0 72 

P 



PD06B 

0000 



0103 

P006C 

B8C2 



0103 

P006D 

0060 




P006E 

00 01 

P 


0104 

P006F 

0000 


MSB 

010 5 

P0070 

0000 


LSB 

010 6 

PQ071 

14EA 




FREAO $G2,CA1,SEGMNT,S£GSIZ , 8, 0 ,3,1,0 


ADC Q SEGMENT Ht1 ADDRESS 

ADC 0 

JMP- ISEAI EXIT TO DISPATCHER 


»»MSOS 4, 0N770Q103 


N7700104 
N770 010 5 
N77O01Q6 


0108 




0109 




QUO 




0111 

POO 72 

£849 

CAl 

0112 

P0073 

4 OFF 


0113 

P0074 

588C 


0114 

P0Q75 

F88A 


Oil 5 

P0076 

4889 


0116 

P0077 

F830 


0117 

P0078 

48F7 


0118 

P0079 

18EE 



RE-ENTER HERE ON COMPLETION OF TRANSFER 


LDQ» 

STO- 

RTJ> 

ADQv 

STQ^ 

AOQ» 

STQ’^ 

JMP» 


TRVTB 

I 

SEGMNT 
SEGMNT-1 
SEGHNT-1 
MESSIH 
LSB 
FRDl 


FETCH ADDRESS OF TRANSFER VECTOR 
AND SAVE IN I 

INITIATE SEGMENT OPERATION 


BUMP SEGMENT TO CORRECT VALUE 
READ IN NEXT SEGMENT 


N770010 8 
N7700109 
N77CQ110 
N7700111 
N7700il2 
N77G0113 
N7700114 
N7700il 5 
N77Q0116 
N7700117 
N7700118 


SYSCOP 
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DATE3 08/19/99 



o 

o 

o 

o 

o 

o 

o 


012 0 
0121 
0122 
0123 
012ii 
0125 
0125 

0127 P007A 0132 

0128 P007B 0165 

0129 P007C 1808 

0130 P007D 0173 

0131 P007F 0852 

0132 P0O7F 0834 

0133 P0080 1805 

0134 P0081 0852 

0135 P0082 0834 

0136 P0083 0121 

0137 P0084 0804 

0138 P0085 IGOO 
P0086 O0A9 


-7 

ss. 

ADDRESS 

COMPARE ROUTINE . 


A.GT,Q 

DIFFERENCE RETURNED IN A 


A • EQ* Q 

A RETURNED ZERO 


A, LT « Q 

A RETURNED FFFF 


COHPAR SAM , AUPPER AIN UPPER BANK 

SQP BTHSAM BOTH IN LOWER BANK 

JHP» QBIGR A IN LOWER, Q IN UPPER 

AUPPER SQM BTHSAM BOTH IN UPPER BANK 

TCQ Q A IN UPPER BANK, Q IN LOWER 

AAQ A DIFFERENCE TO A 

JMP» ABIGR 

BTHSAM TCQ Q 

A AO A SUBTRACT Q FROM A 

SAP ABIGR 

QBIGR SET A Q IS LARGER - A=FFFF 

ABIGR JMP iCHPENT) EXIT 


O 

O 

o 

o 

o 

o 

o 

o 

o 


o 


♦=^MSOS 4. QN77D012D 
»«^HSOS 4. 0N7700121 
’^^^MSOS 4.0N7700122 
’^^MSOS 4, 0N77O0123 
»’fMS0S 4.0N7700124 
♦^HSOS 4. 0N7700125 
N7700126 
^’^MSOS 4, 0N7700127 
^’^MSOS 4. 0N7700128 
®»HSGS 4.DN7700129 
»^MSOS 4.0N7700130 
*^»MS0S 4. 0N7700131 
»’!^MSOS 4.0N77D0132 
»»HS0S 4. 0N77Q0133 
*»MS0S 4. QN77Q0134 
♦»HSOS 4.0N7700135 
^’^MSOS 4,0N77Q0136 
^-MSOS 4.0N7700137 
N770 0138 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 









c 




SYSCOP 


PAGE 7 

DATE^ 08/19/99 



o 

012*1 





THE LOADA 

ROUTINE IS ENTERED VIA THE TRANSFER VECTOR. 

N770Q141 

□ 


01t2 





THIS ROUTINE FETCHES IN THE A REGISTER, THE REQUESTED 

N7700142 



0143 





WORD WHOSE 

ADDRESS IS CONTAINED IN THE A REGISTER. SINGE 

N7700143 


o 

0144 



9 - 


THE IMAGE 

IS ON HASS MEMORY, THE FOLLOWING COMPUTATIONS 

N770 0144 

o 

0145 



» 


ARE REQUIRED. 

N7700145 


0146 



V- 



Q REGISTER IS SAVED 

N7700146 


o 









o 

o 

0148 

PD087 

484A 

LOAOA 

STQ» 

TEMP 

SAVE Q 

N7700148 

o 

0149 

PDoae 

0 8 42 


CLR 

Q 

N/96 = Q + R (SECTOR AND WORQl 

N770D149 


0150 

P0089 

3-80C 



MMRl»-5 

SECTOR LENGTH 

N7700150 



0151 

PDQ8A 

48 IE 


STQ» 

WORD 


N7700151 


o 

0152 

PO 08B 

88 lA 

AOOIH 

A00» 

IMAGE 

SECTOR WHERE IMAGE STARTS 

N77G0152 

o 

0153 

P0Q8C 

0 822 


TRA 

Q 


N770D153 


0154 

P0030 

98 OB 


SUB^ 

SECT 

IS RIGHT SECTOR HERE 

N7700154 



D155 

POO0E 

01 OD 


SAZ 

LOADIT 


N7700155 


o 

015 6 

P008F 

48 09 


STQ» 

SECT 

SAVE NEW SECTOR 

N7700156 

o 

0157 


MMRl 

FREAD $C2-,C0HP- 

,HHR1-1,MHBUF-MMR1-1,BLOCK,6,0,3,I,M 

N7700157 


0157 

P0090 

54F4 








0157 

P0 091 

0903 ■ 







o 

0157 

PD092 

00 09 






o 


P0093 

0000 







0157 

P0094 

D8C2 








0157 

P0095 

0060 







O : 


P0096 

00 A1 






o 

0158 

P0097 

0000 


NUM 

0 

MSB 

N7700156 


0159 

P0098 

7FFF 

SECT 

NUM 

$7FFF 

LS6 INITIALLY NOTHING IN BUFFER 

N77Q0159 



016 0 

P0099 

14.EA 


CIMP- 

(AQISPI 

EXIT TO DISPATCHER 

N77Q016Q 


O 

0161 

P0 0 9A 

C821 

COMP 

L0A-» 

TRVTB 

RESTORE I 

N77Q0161 

o 

0162 

P009B 

60FF 


STA- 

I 


N77G0162 


0163 

P009C 

COOO 

LOADIT 

LOA = 

=X-{$8QO»-IMAGE“AODIH) ADD^ IMAGE INSTRUCTION 

N7700163 




P009D 

881A 







o 

0164 

P009E 

68EC 


STA» 

AO0IM 


N7700164 

o 

016 5 

P009F 

E8 09 


LQQ'» 

WORD 

FETCH WORD REQUESTED IN A 

N7700165 


0166 

POflAO 

CAOO 


LDA 

MM8UF,Q 


N77S0166 




POOAl 

0091 







o 

0167 

P00A2 

E82F 


LDQ^ 

TEMP 

RESTORE Q 

N770Q167 

o 

0168 

POO A3 

IGQQ 


JMP 

ILDAENn 

RETURN TO USER ^''‘HSOS 4 

. 0N7700168 



P00A4 

0079 ■ 








0169 



4 - 




N77G0169 


o 

0170 

P00A5 

OQIC X 

■IMAGE. ^ 

ADC 

CO0OPS 

LSB OF IMAGE SECTOR »»HSOS 4,1 

»»N770017D 

o 

0171 

POOA6 

■0000 

■AUTOIH 

MUM 

Q 

LSB OF^ AUTOLOAD IMAGE 

N77G0171 


0172 

POOA7 

00 00 

MESSIM 

NUM 

0 

LSB OF SYSSEG 

N77G0172 



0173 

POOAR 

0 0 00 

WORD 

ADC 

0 

AODR OF WORD IN SECTOR (0-95) 

N7700173 


o 

0174 






N770 017 4 

o 

0175 

P0DA9 

1800 

LOADAi 

JHP» 

LOADA 


N770O175 

o 









o 

o 









o 


o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


SYSCOP 


PAGE 


OATE5 08/19/99 


0177 




0178 




0179 


1 

*■ 

0180 

POOAA 

D8E0 - 

AUTLDA RAO'^ 

0181 

PflOAB 

5101 

RT J- 

0182 

PQQAC 

ICOO 

JMP 


POOAD 

007A 



LOADA FROM THE AUTOIOAD IMAGE 


AODIM 

LDA,I 

(AUTOA) 


FIX IMAGE ADDRESS TO AUTOLOAD IMAGE 


»»MSOS 


N770Q177 
N7700178 
N7700179 
N7700180 
N7700181 
4. ON7700182 


018,4. 

0185 

0186 
0187 
0138 

0189 

0190 

0191 




GET MESSAGE BIOCK INTO MMBUFF 


PQOAE 

D8DC 

GMESAG RAO* 

POOAF 

88 00 

A 00 

POOBO 

FF4F 

Mur* 

POOBl 

28 E3 

PQ0B2 

510B 

Rf J- 

P09B3 

1C 78 

DMP* 


AODIM 

SEGHNT-1 

MMRl^-5 

ATA,I 

IGMES^ 


FIX IMAGE ADDRESS TO SYSSEG 
RELATI¥E SEGMENT NUM 


N7700184 

N77Q0185 

N77D0186 

N77QQ187 

N7700188 

N7700189 

N770019D 

N7700191 


u 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

rr 

o 

o 

o 

o 


o 


o 
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0193 
019 A 

0195 

0196 


■<> 

* 


THIS CHECKS TO SEE IF MAIN MESSAGE HAS BEEN OUTPUT 
IF NOT IT IS OUTPUT. CORRECT MESSAGE BLOCK MUST BE 
IN CORE. A CONTAINS LENGTH OF MESSAGE. START IS FIRST 
WORD IN MMBUF. 


M770Q193 

N7700194 

N7700195 

N77B0196 


0198 

POOBA 

E8AE 

MM OP 

LOO» 

SEGMFG 

CHECK 

0199 

P00B5 

015A 


SQN 

MEXT 

EXIT 

0200 

P0086 

88 AB 


AOD=» 

SEGIFG 


0201 

P0QB7 

0C16 


ENO 

MHBUF-XFERTB 


0202 

P00B8 

5105 


RTJ- 

LS¥ f I 


0203 

P00B9 

D8A9 


RAO» 

SEGMFG 


020A 

P008A 

1C73 

NEXT 

JMP» 

IMOPT) 



MESSAGE OUT FLAG N770Q19B 

N7700199 
N7700200 
N770C201 
N7700202 
N77B0203 
N770 020A 


0206 POQEB 0 0 00 F'RVTB 


NUM 


0 


ABSOLUTIZE LOCATION OF XFERTB 


N77002a& 


SYSCOP 


PAGE 10 


DATE 


08/19/99 


c 

0208 



'if- 


THE CONVRT 

ROUTINE IS ENTERED VIA THE TRANSFER VECTOR. 

N7700208 

□ 


020 9 





THIS ROUTINE CONVERTS THE HEX NUMBER CONTAINED IN THE 

N77Q0209 



021 0 





A REGISTER 

ON ENTRY TO ASCII. THE ASCII CONVERSION 

N7700210 


o 

0211 



if- 


WILL BE STORED IN A AND Q ON RETURN. Q WILL CONTAIN 

N770 0211 

O 

0212 



if- 


THE LEAST 

SIGNIFICANT CHARACTERS ANO A THE MOST. 

N77D0212 

o 

0214 

POOEC 

58 05 

- CONVRT 

RTJ» 

SEND 

CONVERT MSB 

N7700214 

o 

0215 

PQ.0BD 

48EA 


STQ» 

WLS 

SAVE MSB 

N77CQ 215 


021 6 

POOBE 

58 03 


RTJ^ 

SEND 

CONVERT LSB 

N7700216 



021 7 

POOBF 

C8E8 


LDA^ 

WLS 

GET MSB 

N770Q217 


o ; 

0218 

PGOCG 

1C5F 


JMP^ 

(CONENT ) 


N77GG218 

o 

0219 



¥ 




N7700219 


0220 

POQCl 

.0 0 00 

SEND 

ADC 

0 

CONVERSION ROUTINE 

N7700220 



0221 

POOC2 

580 6 


RTJ» 

SENOl 


N7700221 


O 

0222 

P00C3 

0FA8 


QLS 

8 


N7700222 

o 

0223 

P0QC4 

48QD 


STQ* 

TEMP 


N7700223 


0224 

P00C5 

5803 


RTJ» 

SENOl 


N7700224 



0225 

PO0C6 

F.8 0B 


ADQ^ 

TEMP 


N7700225 


O 

0226 

P00C7 

1CF9 


JMP» 

( SENDl 


N77Q0226 

o 

0227 



if- 




N77QQ227 


. 0228 

P00C8 

0000 

SENOl 

ADC 

0 


N7700228 



0229 

P0QC9 

0 8 42 


CLP 

Q 


N7700229 


O 

0230 

POOCA 

0FF4 


LLS 

4 


N7700230 

o 

0231 

POOCB 

OOF5 


INQ 

-$A 


N770Q231 


0232 

POOCG 

0162 


SQP 

SENDlA-»-l 


N7700232 



0233 

POOCO 

003A 


INQ 

$3A 


N7700233 


O 

0234 

POOCE 

1CF9 


JMP^ 

ISENOl) 


N7700234 

o 

0235 

POOCF 

00 A1 

SENDIA 

INQ 

$41 


N7700235 


0236 

POOOO 

1CF7 

SENDIB 

JHP^ 

(SENOl) 


N77QG236 



0237 

POODl 

0000 

TEMP 

ADC 

0 

TEMPORARY STORAGE 

N7700237 


O 

0238 


00A8 

P WLS 

EQU 

WLS (WORD) 

LEAST SIG. CHARACTERS 

N77D0238 

o 

o 









o 

O 









o 

o 









o 

o 









o 

o 









o 

o 









o 












o 


SYSCOP 
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11 


DATE: 08/19/99 


0240 

0241 

0242 

0243 

0244 


¥■ 


CONVERT AND STORE IN ADDRESS IN. 0. 

A HAS THE HEX BUFFER TO OBTAIN VALUES AND THE LOCATION 
FOLLOWINF THE CALL IS THE THE NUMBER OF VALUES TO BE DONE. 


N77G0240 

N7700241 

N7700242 

N7700243 

N7700244 


0246 

0247 

0248 

0249 

0250 

0251 

0252 

0253 

0254 

0255 

0256 
025 7 

0258 

0259 

0250 

0251 

0252 

0263 

0264 

0265 

0266 

0267 

0268 
0259 

0270 

0271 

0272 

0273 


P0002 

4818 

CON VST 

STQ^ 

TEMPI 

P00D3 

881A 


ADD’^ 

SEGAOR 

P00D4 

6817 


STA» 

TEMP2 

P00D5 

EC54 


LDQ’^ 

ICONS!) 

P00D6 

0 8 53 


RAO^ 

CONST 

PD0O7 

4815 

CONSLP 

STQ^ 

TEMP3 

P00D8 

014F 


SQZ 

CONVEX 

PQ0D9 

E812 


LOQ» 

TEMP2 

POODA 

C622 


LDA~ 

(ZERO) , Q 

POOOB 

5103 


RTJ- 

CON, I 

PflODC 

6D0E 


STA'^ 

(TEMPI) ,I 

POOOD 

080D 


RAO* 

TEMPI 

POODE 

4D OC 


STQ» 

(TEMPI) ,I 

POOOF 

EC4A 


Lon* 

(CONST) 

POOEO 

0143 

SKSPC 

SQZ 

SPC DON 

PODEl 

D809 


RAO* 

TEMPI 

P00E2 

ODFE 


INQ 

-1 

P00E3 

18FC 


JMP* 

SKSPC 

P00E4 

D807 

SPCCON 

RAO* 

TEMP2 

P00E5 

E8 07 


LDQ* 

TEMP 3 

P0QE6 

QDFE 


■INQ 

“1 

POOE7 

IBEF 


JMP* 

CONSL’P 

P00E8 

D841 

CONVEX 

RAO* 

CONST 

P00E9 

1C 40 


JHP* 

(CONST) 

POOEA 

OOOO 

TEMPI 

■ADC 

0 

POOEB 

0000 

TEHP2 

ADC 

0 

PODEC 

0 0 00 

TEMP3 

ADC 

0 

POOED 

00 0 0 

SEGAOR 

ADC 

0 


RELATIVE ADDRESS OF ASCII BUFFER 
SAVE A8S ADOR OF HEX BUFF'ER 

HEX BUFFER 


NUMBER OF ENTRIES 
DONE 

GET ABS ADOR OF BUFFER 


»»MSOS 4 


»^MSOS 

»»HSOS 


4. 

4 » 


CONVERT 

STORE 


SKIP SPACE 


DO NEXT 
EXIT 


ABS ADOR OF SEGMENT 


♦»MSOS 


N77QQ246 
0N7700247 
N7700248 
N770Q249 
N7700250 
N7700251 
N770 0252 
0N7700253 
0N77QQ254 
N7700255 
N7700256 
N7700257 
N7700258 
N77Q0259 
N7700260 
N7700261 
N7700262 
N7700263 
N77Q0264 
N7700265 
N77Q0266 
N7700267 
N7700268 
N770Q269 
N770Q270 
N7700271 
N7700272 
4- 0N77Q0273 


SYSCOP 
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DATES 0 8/19/99 


0275 





THIS ROUTINE 

HANDLES R/W REQUEST TO COMMENT AND 

N7700275 

0276 





LIST DEVICES 

ON ENTRY A CONTAINS LENGTH OF THE 

MESSAGE 

N7700276 

0277 





AND Q IS ITS 

RELATIVE ADDRESS 

TO XFERTB 


N7700277 

0279 





THERE ARE THREE ENTRIES LIST 

OUT, COMMENT OUT, 

AND COMMENT 

IN77Q0279 

0281 

PQOEE 

6825 

LISTIT 

STA» 

CALLf5 

SAVE LENGTH 



N7700281 

0262 

POOEF 

COOO 


LDA 

=N$18F8 

LIST LU 



N77QQ282 


POQFO 

18FB 







0283 

PCOFl 

6821 


STA^ 

CALLf4 

SAVE LU 



N7700283 

028 4 

P00F2 

COOO 

FWRC 

LDA 

= XSCQ04-CP 

REQUEST CODE = 

FWRITE ABSOLUTE 


N7700284 


P0 0F3 

0CQ3 








0285 

P0DF4 

5811 


RTJ» 

CALLER 




N7700285 

028 6 

P00F5 

1C2C 


JMP» 

(LSTENT ) 




N7700286 

0288 

R0QF6 

681D 

WRITTT 

STA^ 

CALL4-5 




N7700288 

0289 

P0CF7 

COOO 


LDA 

=N$18FG 

COM OUT LU 



N7700289 


POOF8 

18FC 








0290 

PQ0F9 

6819 


STA^ 

CALL^-4 




N7700290 

0291 

POOFA 

C8F8 


LDA‘» 

FWRC3-1 




N7700291 

0292 

PODFB 

580A 


Rir 

CALLER 




N7700292 

0293 

POOFC 

1C27 


JMP» 

{WRTENT) 




N7700293 

0295 

POOFO 

6816 

ANSWER 

STA» 

CALL^5 




N7700295 

0296 

POOFE 

CO 00 


LDA 

= N$18F0 

COMMENT IN LU 



N77Q0296 


POOFF 

18FD 








0297 

POlOO 

6B12 


STA^ 

GALL»-4 




N77G 0297 

029 8 

POlOl 

COOO 


LDA 

= X$80 0»-CP 

ERE AD 



N770Q298 


P0102 

0 8 03 








0299 

P01G3 

5802 



CALLER 




N770D299 

030 0 

P0104 

1C21 


JMP» 

lANSENn 




N7700300 

0302 

P0105 

00 00 

CALLER 

NUM 

0 




N77Q0302 

0303 

POiO 6 

6809 


STA» 

CALUt-l 




N7700303 

0304 

P0107 

FOFF 


ADQ- 

I 

ABSOLUTIZE BUFFER ADDRESS 


N77003Q4 

0305 

P0108 

caoo 


LDA 

SEGOP 

CHECK MESSAGE OPTION 


N7700305 


P0109 

FF57 








0306 

POlOA 

9622 


SUB- 

(ZERO) , Q 




N7700306 

03 0 7 

POlOB 

013C 


SAM 

CALEX 




N770 0307 

0308 

POIOC 

DDOl 


INQ 

1 




N77Q0308 

0309 

POlOO 

48 07 


STO^ 

CALL*-6 




N7700309 

0310 









N7700310 

0311 

POIOE 

5 4 F4 

CALL 

RF J- 

1$F4I 




N7700311 

0 312 

PDIOF 

00 00 


NUN 

0 

RC 1 



N7700 312 

0313 

POllO 

0000 


NUM 

0 

COMP 2 



N7700313 

0314 

POlli 

GOOD 


NUM 

0 




N770 0 314 

0315 

P0112 

00 00 


NUM 

0 

LU 4 



N7700315 

0316 

P0113 

QOOO 


NUM 

0 

N 5 



N7700316 

0317 

PO 114 

00 00 


NUM 

0 

S 6 



N7700317 




o 

o 

o 

o 


o 
I o 

I 

I o 


o 


N7700318 
N7700319 
N770D320 
N7700321 
N77Q0 322 


N77Q032^ 


N7700326 

N7700327 

N77QG323 

N7700329 


□ 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


0331 

0332 

0333 

0334 


0336 

033 7 
0336 

0339 

0340 
0 341 

034 2 
0343. 

0344 

0345 

0346 

0347 

0348 

0349 

0350 
0 351 

0352 

0353 

0354 

0355 

0356 

0357 

0358 

0359 
0 3 6 0 

0361 

0362 

0363 
0 364 

0365 

0366 

0367 


0369 

0370 

0371 
037 2 


SYSCOP 
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DATEl 08/19/99 




SYSTEH CHECKOUT PROGRAM TRANSFER WCTOR. 

SUB-MOO ULES SET I REGISTER TO ADDRESS OF TRANSFER VECTOR 
TABLE. TO USE TRANSFER VECTOR TABLE ENTRY SIMPLY 
RETURN JUMP TO 1,1 — 5,1 — 9,1— ETC. 


N7700331 

N7700332 

N7700333 

N7700334 



one P 


EQU 

XFERTBI ») 

POllC 

1 3FC 

GOOFF 

J M 

E XI ICO 

POllO 

0 0 0 0 

LDA ENT 

NUM 

0 

POllE 

188A 


JMP» 

LOADAl 

POUF 

00 00 

CONENT 

NUM 

0 

PD12G 

18 9B 


JMP» 

CONVRT 

P0121 

00 00 

LSTEHT 

NUM 

0 

P0122 

18CB 


JMP» 

LISTIT 

P0123 

oooo 

WRT ENT 

NUM 

0 

P0124 

18D1 


JMP» 

WRITIT 

PQ125 

00 00 ■ ’ 

ANSENT 

NUM 

0 

P0126 

1806 • 


JMP» 

ANSWER 

P0127 

0000 ' - 

AUTOA 

NUM 

0 

P0128 

1861 


JMP-^ 

AUTLDA 

P0129 

0 0 00 

CONST ' 

NUM 

0 

P012A 

16A7 


JMP^ 

CONVST 

P0128 

0 0 6 0 

GMES 

NUM 

0 

P012C 

1881 ■ 


JMP» 

GMESAG 

P012D 

0 0 00.- 

MOPT , 

NUM 

0 

P012E 

18 85- 

-qf 

JHP» 

MMOP 

P012F 

OBOO 

CMPENT 

NOP 

0 

P0130 

1800 


JMP 

COMPAR 

P0131 

FF48 





0 COO 

EXIT FROM G/0 PACKAGE 

1 LDA 

FETCH CONTENTS OF IMAGE CELL SPECIFIED IN A 
Q IS RESTORED 
3 CON 

CONVERT HEX Q TO ASCII A - Q 
5 LST 

FWRTTE ON LIST OUTPUT DEVICE 

RELATIVE ADDRESS IN Q AND MESSAGE LENGTH IN A 
7 WRT 

FWRTTE ON COMMENT OUTPUT DEVICE 
SAME AS LIST 
9 ANS 

FREAO ON COMMENT INPUT DEVICE 
SAME AS LIST 
11 AT A 

LQADA FROM AUTOLOAD IMAGE 


1 3 CNS 

SAME AS CONVERT BUT 
SPECIFIED BY Q FROM 
15 GMS 

GET MESSAGE BLOCK INTO 
ADDRESS SPECIFIED BY A 
17 MOP 

OUTPUT MAIN MESSAGE 
LENGTH IN A 
19 CMP 

COMPARE A AND Q 


STORE INTO BUFFER 
BUFFER IN A 


■HMBUF 


'‘^MSOS 4. 


N7700336 
N7700337 
N7700338 
N7700339 
N77G0340 
N7700341 
N7700342 
N7700343 
N7700344 
N77Q0345 
N7700346 
N77Q0347 
N770 0348 
N7700349 
N7700350 
N7700351 
N7700352 
N77Q0353 
M77Q0354 
N77Q0355 
N7700356 
N77Q0357 
N7700358 
N77Q0359 
N77C036G 
N77D0361 
N7700362 
N7700363 
N7700364 
N770Q365 
ON77Q0366 
N7700367 


PO 132 00 60 


ti- 


MASS MEMORY BUFFER FOR LTiA,ATA, AND GMS 

BZS MMBUF (BLOCK) 

THIS EQU MUST BE SET UP IN SYSSEG ALSO 


N77Q0369 
N770D370 
N7700371 
N770Q 372 


o 


SYSCOP 


PAGE 

15 

date: 08/19/99 

o 

0373 
037 4 

0016 

■» 

EQU 

SEGCORI MMBUF- XFERTB ) 

SEGMENT CORRECTION 

o 

0375 

0376 

0192 

EQU 

END 

LENSYSC 

SYSCOP 

^-CKOUTJ 

PROGRAM LENGTH 

o 

PGM= 

0192 < 40 2) 

COM = 

0000 { 

05 DAT = 

0000 ( 0) 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


N7700373 
N770 D374 
N7700375 
N7700376 


o 

o 

o 

o 

o 

o 


o 


o 

o 

o 

o 

o 

o 

o 

o 


o 


o 
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OATES 08/19/99 


EQUIVALENCES 


DEF .LINE 

NAME 

VALUE 


REFERENCED AT 

LINE NUMBER 

0 000 

I 

OOFF 

ID00255) 

0 0 29, 

0112, 

0162, 0304, 

0 0 09 

ADISP 

DOHA 

( 0002345 

0160, 

0 318 


0009 

ZERO 

0022 

10000349 

0254, 

0306 


ODIO 

CP 

000 3 

(0000033 

0284, 

0 293 


0011 

BLOCK 

' 0060 

(0000963 

0 013, 

0157, 

0370 

0012 

L 

0001 

( Q00QO13 

0013 



0013 

SEGSIZ 

GG60 

‘IOOOQ963 

0066, 

0103 


OOIA 

ASEC 

flOOF 

( 0000159 




0015 

LDA 

0001 

(0000013 

0181 



0015 

CON 

0003 

(0000033 

0048, 

0255 


0 015 

LSI 

000 5 

(0 000053 

0041, 

0053, 

0202 

0015 • 

WRT 

0007 ^ 

(000007) 




0 015 

ANS 

0009 

(0000093 




0 015 ‘ 

ATA 

OOOB 

( 0000113 

0190 



0 015 

CNS 

OOGD 

(0000133 




0015 

GMS 

oaoF 

(0000153 




0016 

MOP 

0011 

{ 0000173 




0017 

CMP 

0013 

( Q00019) 




0 0 63 

LINTMS- 

GOO 6 

( 0 000069 

0 0 40 



0 068 

LLOCMS 

GOOD 

(0000133 

0052 



0373 

SEGCOR 

0016 

(0000223 




0375 

LENSYS 

0192 

( 0004023 





0321 




SYSCOP 
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DATE? 

o 







o 

S y M B 0 

L S 











o 

DEF.LINE 

NAME 

■ ADDRESS 

REFERENCED AT 

LINE NUMBER 

0019 

. CKOUT 

0000 

00 28 , 

0031, 

0375 


0020 

HERE 

000 0 

0071 




0 0 22 

SEGMNT 

0001 

0082, 

0086, 

0103, 0113, 

o 

0027 

SETUP 

0 001 

0055 



0057 

SETTHP 

0027 





0 0 61 

INTMES 

0028 

0 0 39, 

0063 



0065 

LOCMES 

002F 

0051, 

■ooeE 


o 

0067 

IMGSEC 

003 B 

0 0 49, 

0050 


0070 

fpyTBC 

003D 

0020, 

0072, 

0074 


0 076 

ADRCAL 

0046 

0079 , 

0081 , 

0082 


0 086 

SEGFIL 

004F 




o 

0 090 

SEGOP 

0061 

G'305 



0091 

SEGIFG 

0062 

0200 




0 092 

SEGMFG 

0063 

0198 , 

0203 



0093 

SEGCl 

0064 




o 

0094 

SEGC2 

0Q65 




0095 

SEGC3 

0066 





0096 

SEGC4 

0067 





0103 

FROl 

0068 

0056, 

0080, 

0083, 0118 

o 

0104 

MSB 

0 06F 



010 5 

LSB 

0070 

0037, 

0117 



0111- 

CAl 

0072 

0079, 

0 08 4, 

0103 


0127 

COHPAR 

0 07 A 

0367 


o 

0 130 

A UP PER 

G07D 

0127 



0134 

8THSAH 

0081 

0128, 

013 0 



0137 

QBIGR 

008 4 

0129 




0138 

ABIGR 

0 08 5 

0133, 

0136 


o 

0148 

LOADA 

0 0 87 

0175 



0152 

ADOTM 

00 8B 

0163, 

0164, 

0180, 0187 


0157 

MNRl 

0090 

0150 , 

0157, 

0157, 0189 


0159 

SECT 

00 9 8 

0 15^+, 

015 6 


o 

0161 

COMP 

009A 

0 157 


0163 

LOADIT 

Q0 9C 

0155 




0 170 

IMAGE 

00A5 

0152, 

0163 



0171 

AUTOIM 

0QA6 

0 045 



o 

0172 • 

HESSIM 

O0A7 

0 038, 

0 116 


0173 

WORD 

OOA8 

0151, 

0165, 

0233 


0175 

LOA'DAl 

OOA9 

. 0340 



0 180 

AUTLDA 

OOAA 

0355 



o 

0187 

G ME SAG 

00 AE 

0361 



0198 

MMOP 

0084 

0364 




08/19/99 


0114, Oil 










r 



SYSCOP 
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DATE:: 

08/19/99 

o 

0204 

MEXT 

OOBA 

0199 



0 320 

o 


0 206 

TRVTB 

OOBB 

0073, 

0111, 

0161, 



0214 

CONVRT 

ODBC 

0 343 





o 

0 220 

SEND 

OOCl 

0 214, 

0216, 

0226 


o 

0228 

SENDl 

DOCS 

0221, 

0224, 

0234, 

0236 


0235 

SENOIA 

OOCF 

0232 






0236 

SENDIB 

OOOO 




0225 


o 

0237 

TEMP 

OODl 

0148, 

0167, 

0223, 

o 

0238 

WLS 

OOA8 

0215, 

0217 




0 24 6 

GONVST 

OOD2 

0358 






Q 251 

CONSLP 

00D7 

0267 





o 

0 260 

SKSPC 

DOEO 

0263 




o 

0264 

SPCOON 

OOE4 

0260 





0268 

CONVEX 

00 E8 

0252 






0 270 

TEMPI 

OOEA 

0 2 46, 

0256, 

0257, 

0258, 

0261 

o 

0 271 

TEMP2 

OOEB 

0248, 

0253, 

0264 


^ o 

0272 

FEMP3 

OOEC 

0251, 

0265 




0273 

SEGADR 

QOED 

0075, 

0 24? 





0 281 

LISTIT 

OGEE 

0346 





o 

0284 

FHRC 

OOF2 

0 2 91 




o 

0288 

WRITIT 

OOFS 

0 349 





0295 

ANSHER 

OOFD 

0352 






0302 

CALIER 

0105 

0 285, 

0292, 

0299, 

0322 


o 

0 311 

CALL 

OlOE 

0033, 

0 281, 

0283, 

0288, 

0290, 0295, 0297, 0303, 0309 , Q 

0 320 

GALEXT 

Oil 6 

0031 





0322 

CALEX 

0118 

0307 






0 32 7 

EXITGO 

0119 

0337 





o 

0329 

FILE2 

OllB 

0030 




0201, 0373 . ^ 

0336 

XFERIB 

one 

0028 , 

0039, 

0051, 

0071, 


0337 

GOOFF 

one 







0339 

LDAENT 

OllD 

0168 





o 

0 3 42 

CONENT 

OllF 

0 218 




O 

0345 

LST'ENT 

0121 

0286 





0346 

WRTENT 

0123 

0293 






0 351 

ANSENT 

012 5 

0300 





o 

0 354 

AUTOA 

012 7 

D 182 




0 26 9 

0357 

CONST 

0129 

0 2 49, 

0 250, 

0259, 

0268, 


0360 

GMES 

012B 

0191 






0363 

MOPT 

0120 

0 204 





o 

0366 

CM PENT 

012F 

0138 




■ O 

0 370 

MMBUF 

0132 

0157, 

0166, 

0 201, 

0373 

o 








O 

o 








O 

o 








■ o 

o 








o 

o 








o 












. . 

. .... . . . . . -- • - - 
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DATE! 08/19/99 



c ■ 

EXTERNA IS 

o 

OEF.LINE NAME VALUE 

O 0007 SYSSEG GOOD 

0008 COBOPS 00A5 

O 

O 

o 


o 


O 

O 


O 


o 

o 

o 


o 

o 

o 


REFERENCED AT LINE NUMBER 
0034 

0047, 0170 


o 

□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


SYSCOP 
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DATES Q8/19/99 




SORT 

0 F 

S Y M B 

AOISP 

0 0 09 

ADRCAL 

AUTOA 

0354 

AUTOIM 

CKOUT 

0 019 

CMP 

CONSLP 

0 2 51 

CONST 

FROl 

0103 

FWRC 

INTHES 

0061 

L 

'LQADAl 

0175 

LOA'DIT 

MMOP 

0198 

HMRl 

SEGC2 

0 0 94 

SEGC3 

SEGSIZ 

0 013 

SEND 

SYSSEG 

0007 

TEMP 

WRITIT 

0288 

WRT 


0 t S 



0076 

A NS 

0015 

0171 

BLOCK 

0011 

0017 

CMPENT 

036 6 

0357 

CONVEX 

0268 

0284 

GMES 

036 0 

0012 

LDA 

0015 

0163 

LOCMES 

0065 

0157 

MOP 

0016 

0095 

SEGC4 

0096 

0220 

SENDl 

0228 

0237 

TEMPI 

0270 

0015 

WRTENT 

0348 


o 


o 

o 


o 

o 

o 

o 

o 

o 

o 


o 


ANSENT 0351 ANSWER 0295 
BTHSAM 0134 CAl 0111 

CNS 0015 COBOPS 0008 

CONVRT 0214 CON VST 0246 
GMESAG 0167 GMS 0015 

LDAENT 0339 LENSYS 0375 
LSB 0105 LST 0015 

NOPT 0363 MSB 0104 

SEGCOR 0373 SEGFIL 0086 
SENOIA 0235 SENDIB 0236 
TEHP2 0 271 TEHP3 0272 
XFERTB 0336 ZERO 0009 


ASEC 

0014 

ATA 

0015 

CALEX 

0 322 

CALEXT 

0320 

COMP 

0161 

COMPAR 

0127 

COOFF 

0 337 

CP 

0010 

HERE 

0 020 

I 

0000 

LINTHS 

0063 

LISTIT 

0281 

LSTENT 

0345 

HESSIM 

0172 

QBIGR 

0137 

SECT 

0159 

SEGIFG 

0 091 

SEGMFG 

0G92 

SETTMP 

0 057 

SETUP 

0027 

TRVT8 

0 20 6 

TRVT8C 

0070 


{’ ') 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


nni 's T 


PAGE 


1 


QATtJ G8/19/99 



SUHMARY-110N78G0001 
N7800002 
N78000D3 
N78Q 0 Q04 
N7800005 


N780 0006 

N7800007 

N7800Q08 

N7800009 

N7B00Q10 

N7800Q11 

N7800012 

N780 0013 

N78Q 0014 

N780fl015 

N78Q0016 

IM7800017 

N7800018 

N7800Q19 

N78Q0020 

N78Q0021 

N7800022 

N780C023 

N78QO.a24 

N7800025 

N7800Q26 

N7800027 

N780GG28 

N7800029 

N780003D 

N7800031 

N78iQ032 

N7800033 

N760 0 034 

N7800035 

N78Q0G36 

N7800037 

N7800038 

N7800 039 

N7800Q4D 

H78D0041 

N7800Q42 

M7800043 

N7800D44 

N7800045 

N7800346 

N78Q0047 

N780CG48 

N7800049 

N78Ci0050 

N78fl0051 

N7800052 

N7800Q53 


O 

□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 



COISI 


PAGE 2 

005 4 

EM 

IFC 

®G%NE, 0 

0055 


IFC 

»G«',EQ, 1 

0056 


EQU 

•B* V2 t^^-^A'+SEGCOR) 

0057 


ALF 

. 

005 8 


EIF 


0059 

EM 

IFC 

»I» ,NE, 0 

00 5 0 


IFC 

•I*-,EQf 1 

0061 


ECU 

•8» V3 ( «^-*A ’H-SEGCOR) 

0062 


ALF 


0063 


EIF 


0064 


EIF 

■EM 

0065 


EQU 

L“8‘'C^*-S»B®-1 ) 

0066 


EMC 


0067 

A DOMES 

MAC 

A j B f C 

0068 


EQU 

•B* X® A* ) 

0069 


ALF 

, ,*C* . 

0070 


EQU 

L*B ' (»^-S»A®-l ) 

0071 


EMC 



date? 08/19/99 


N78CQ054 
N7800055 
N7800056 
N7800057 
N7800058 
N7800 059 
N7800060 
N7890 061 
N78QQ052 
N7800063 
N7800 064 
N7800065 
N78Q0066 
N7800067 
N7800068 
N78COG69 
N780007G 
N7800071 


1 ..) 

o 

o 

o 

o 

o 

o 

o 


0073 
007 4 
007 5 
007 6 
0 077 

0078 

0079 
003 0 
0081 


0082 
00 83 
0084 


COIST 

QDOO P 
00 60 


0016 
0 0 01 
00 03 
0 0 05 
00 07 
G0C9 
OOOB 
GOOD 
0 0 OF 
0011 
0 013 


V- 




P/\GE 


SYST01 CHECKOUT SEGMENTS 1ST 
SYSTEM CHECKOUT PROGRAM 
ECU SYSSEGI^) 


DATE.: 08/19/99 


SEGMENTS 


SEGSIZC 96) 


EQU 

AGREE WITH EQU 'S 

EQU SEGC0Rf22) COMPARE A_AND Q 
EQU LDA (1 ), ■ 


N78Q0073 
N7800 07 4 
N78D0075 
N78Q0 076 
N7800077 
N7800078 


9 9- V- 

IN SYSCOP»»»»»»*^^-«-^^**N7800 079 
»-MSOS 4.QN7800Q80 
CON (3) , 1ST I 5) » WRT(7) ,A"NS ( 9) , AT A I11)-,CNS (13 ),GMS (15) N7 80 0 0 81 


EQU 

EQU 


MOP (17) 
CMP(19) 


^’^MSOS 


N7flOQ 082 
0N7800083 
N7800Q84 


C.) 

o 

o 

o 

o 

o 

o 

o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

■ o 

o 

o 

o 

o 

o 

o 


COIST 


PAGE 


4 


DATE? 08/19/99 


0036 

EXT 

0087 

EXT 

0088 

EXT 

0089 

EXT 

D090 

EXT 


COBOP 

FNR,COHPRQ,HASKT,REQXT,VOLR,VOLA, 
OISPXX, MONI,IPROC, ALLIN.H AXSEC,LO 
ALCLGH ALLOCAIABLE CORE LE 
AREAC START OF ALLOCATADL 


LUABS,SABS 

N780G086 
^-»MSOS 4.1»^N7800 087 

GlAfTSIPRC 

N7800088 

NGTH TABLE 

N7800Q89 

£ CORE 

N7800Q90 



o 




N7800092 

o 

N780G 093 


N7800094 


N78Q0 095 

o 


o 


o 


o 


N780Q097 

o 

N7800Q96 

N7800099 


N780Q10G 


N78Q0101 

o 

N78001Q2 

N7800103 


N7800i0i+ 


N780D105 

o 

N7800106 

N780Gi07 

^ o 

N7800108 



o 

N7800109 


N7800110 


N7800111 

o 

N7800112 


N78D0113 


N7800114 

o 

N7800115 

o 

N7800116 


N7800117 


N78D0118 


N7800il9 

o 

N7800120 


o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


COIST PAGE 6 DATES 08/19/99 


0121 

POOIB 

18ED 


JMP» 

OPl 

TRY AGAIN 

0122 

POOIC 

G9Ffi 

0P2 

INA 

$30-$34 

OK 

0123 

0124 

POQIO 

POOIE 

0131 

18EA 


SAM 

JMP» 

0P3 

OPl 

0125 

POOIF 

0904 

OPS 

INA 

4 

SET OPTION 

OPTION ZERO-GO TO DUMP 

0126 

0127 

0128 
0129 
G13Q 

P0020 

P0021 

P0022 

P0023 

6840 

0112 

0G07 

ICDC 

V- 

STA'i^ 

SAN 

ENQ 

JMP» 

OPOP 

0P4 

DPN-OPN 

lOP) 


0132 ^ 

Q133 P0D24 0C02 OP4 

0134 P0025 0814 0P41 

0135 P002b 3817 

0136 P0027 5101 

0137 P0028 6A14 

0138 P0029 OOFC 

0139 PC02A 0142 

0140 P0026 0D04 

0141 PG02C 18F8 

0142 P0020 GOOD OPS 
P002E OOFF 

0143 PQQ2F 5101 

0144 P0030 6810 

0145 P0031 0A09 

0146 PQ032 510F 

0147 

0148 

0148 P0033 0A3E 
0148 P0034 0C2E 
0143 P0035 5100 
0148 P0036 0003 

0148 P0037 0002 

0149 

0150 

0150 P0038 0A15 
0150 P0039 QC2Q 

0150 P003A 5105 

0151 ^ 

0152 P0Q3B OCOi 

0153 P0D3C 1CG3 

0154 

0155 PC03O 7FFF X 0PG08 

0156 P003E 0003 OPTMP 

0157 ^ 

0158 P0041 OOIF 


REGISTERS A AND Q 

ENQ 2 
TRQ A 
AOD» OPCOB 
RTJ- LDA,I 
STA- OPTHP-2,Q 
INQ ”3 
SQZ OP5 
INQ 4 
JMP» 0P41 

LDA =XI GET I REGISTER 

R¥vJ~ LOAtl , 

STA=f OPTHP + 2 
ENA OPNXN-OPN 
RTJ- GMS^I 

FILL HESSAGE 

CONSTR 3,0PTMP,0PM2V1,0P,1 


OUTPUT HESSAGE 

LISfll 0PH2 


EXIT 

ENQ yLGN-OPN 
JMPv 10P5 

ADC GOBOP 
BZS OPTMP{3) 


BZS 0PFILISEGSIZ-'^40P) 


N7800121 

N7800122 

N7800123 

N7800124 

N780Q125 

N7800126 

N78QQ127 

N7800128 

N78Q0129 

N7800130 


N7800132 
N7800133 
N7800134 
N7800135 
N780fll36 
N730 0137 
N7800138 
N7890139 
N7800 140 
N780Q141 
N78B0142 

N7600 143 
N7800144 
N7800145 
N7800146 
N7800147 
N78Q0148 


N78Cfll49 

N78S015Q 


N7800151 

N7800152 

N7800153 

N7800154 

N780D155 

N7800156 

N780Q157 

N76G0158 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


COiST 


O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


0150 




0161 




0162 




0153 




0153 

006D 

P 


0163 

QQOl 



0153 

OOCO 

P 


0163 

QQCl 

P 


0163 

0QC2 

P 


0163 

Q0C3 

P 


0163 

00C4 

P 


0163 

0QC5 

P 


0163 

00C6 

P 


0163 

P0060 0000 




PAGE 7 

LOCORE ANALYSIS PART V 
STRTSG VLC 


date: Q8/ 19/99 


16 5 

PO 

061 

C860 

LDA* 

\/LC 

IFG 

16 6 

Pfl 

062 

0103 

SAZ 

LCl 


167 

PO 

063 

cooo 

LDA 

= X$ 

51G0+ATA 


PO 

064 

510B 




168 

PO 

065 

6803 

STA* 

LCl 

2 


0170 



V- * 

9- 

Kt 9- 

0171 

P0Q66 

DC02 

LCl 

ENQ 

2 

0172 

P0067 

0 814 

LCll 

TRQ 

A 

0173 

PC068 

5101 

LC12 

RTJ- 

L0A,I 

0174 

P0069 

88 06 


AOD* 

LCCS 

0175 

PG06A 

0DB9 


INQ 

-$46 

0176 

P006B 

0165 


SQP 

LC2 

0177 

P006G 

6 8 03 


STA* 

LCCS 

0178 

P006D 

0D47 


INQ 

$47 

0179 

P006E 

18F8 


JHP» 

iCll 

018 0 

P0D6F 

ODOO 

LCCS 

NUM 

0 

0181 

P0Q70 

0 0 IE 

LCCCS 

NUM 

$001E 

0182 



# 



0183 

P0071 

98FE 

LC2 

SUB* 

LCCCS 

0184 

Pe072 

0107 


SAZ 

LCX 

0185 






018 6 






0187 

P0073 

0A09 


ENA 

LCMXN-\f'LCN 

0188 

P0074 

510F 


RTJ- 

GMS^ r 

0189 

P0075 

Q AOC 


ENA 

LLCM2 

0190 

POO 76 

5111 


RTJ- 

MOP, I 

0191 




LISTIT LCM3 

0191 

P0C77 

0 AOC 




0191 

PQ078 

0C28 





♦CHECKSUM 2 THRU $46 OF LOCORE* 


DONE 


CHECKSUM 

CORRECT CHECKSUM 


OK 

CHECKSUM ERROR 

CHECK IF ERROR MESSAGE OUT 


N7800160 

N7800161 

N7800162 

N78Q0163 


N78Q0155 

N7800166 

N78Q0i67 

N7800168 


N760017D 
N7800171 
N7800172 
N7800173 
N7800174 
N7800175 
N7800176 
N780017f 
N7600178 
N78Q0179 
N7800180 
N7800181 
N7800182 
N7800183 
N7800184 
N7800185 
N7800186 
N7800187 
N7800188 
N7800189 
N780 0190 
N7800191 


L-v-l 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


COIST 


PAGE 


8 


DATE; Q8/19/99 



o 

o 

o 

o 

o 

o 

o 

o 

o 


N780D192 

N780Q193 


N7800195 


C) 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


COIST 


PAGE 


g 


DATE 


08/19/99 


0197 




0198 




0199 




0200 




020 Q 

OQCO 

P 


020 0 

0 0 02 



0200 

■ 0120 

P 


0200 

0121 

P 


020 0 

3122 

P 


020 0 

0123 

P 


0200 

0124 

P 


0200 

0125 

P 


0200 

0126 

P 


020 0 

PDOCO 0000 




LOCORE ANALYSIS PART W 
STRTSG WLC 


N7800197 

N7800198 

N7800199 

N7SQ0200 


O 

O 

O 


o 


O 


0202 PGOCl C860 

0203 POOC2 0104 

0204 P00C3 CQOO 
PD0C4 510B 

0205 PO0C5 660F 

0206 P0OC6 6824 


LDA'» MLCIFG 
SAZ LC3 

LDA =X$510Q s-ATA 

STA» LCSIX 
STA- LC311 


N7800202 

N78QC2D3 

N70GO2O4 

N78Q0205 
N78Q 0 20 6 


020 8 



s- 



0209 




9 

9 

0210 

P00C7 

E83A 

LC3 


LCGTR 

0211 

P0OC8 

EA30 


LOQ» 

LCA T 3 f Q 

0212 

P0CC9 

0141 


SQZ 

LG313S 

0213 

POOCA 

1813 


JMP* 

LC313 

0214 

PO OCB 

OAFE 

LC313S 

ENA 

-1 

0215 

POOCC 

6835 


STA’^ 

LCCTR 

0216 

poocn 

G8 4F 


LDA^ 

TSF8 

0217 

POOCE 

90 11 


SUB- 

$11 

0218 

POOCF 

01 IB 


SAN 

CKTS 

0219 

PODOO 

E8 4B 


LDQ» 

MSQSF8 

0220 

POOQl 

COOO 

LC31W 

LDA 

=N$00F8 


P00D2 

8 0F6 




0221 

P00D3 

6S2F 


STA*^ 

LCADO 

0222 

P0004 

5101 

LC31X 

RTJ- 

LDA, I 

0223 

P0 0D5 

4.8 2F 


SfQ» 

LCilADO 

0224 

P0QO6 

6820 


SI A* 

LCISAO 

0225 

P0 007 

,0 874 


EAQ 

A 

0226 

P0 0O8 

0101 


SAZ 

LC3 Z 

0227 

P00D9 

1818 


JMP* 

LC33 

0228 

POODA 

1809 

LC3Z 


LC32 

0229 

poooa 

E8 41 

CKTS 

LDQ’^ 

TSF8 


23 CAROS DELETED 
■»CH€CK LOCORE ADDRESSES 

. ADDRESS TABLE 




V- 


9 


IS THIS A TIMESHARE STSTEH 

TESt SETUP $F8 CHECK FQR TIHESHARE 
NO, SETUP $F8 CHE'CK FOR MSOS 


valid ADDRESS 
CURRENT ADDRESS 

BAD COHPARE 


9 


N7800208 
N7800209 
N7800210 
N7808211 
N780G212 
N7800213 
N780Q214 
N78D0215 
N7800216 
N 780 0 21 7 
N7800218 
N7B00219 
N78D0220 

N7800221 

N7S00222 

N78II0223 

N7800224 

N78a8225 

N7800226 

N78B0227 

N7800228 

N7800229 


O 

O 

o 

o 

o 

o 

o 

o 

o 


COIST 


PAGE 10 


OATEl 08/19/99 


0230 

POODC 

18F4 


JMP» 

LC31W 

0231 

PDOOO 

ODQO 

LC313 

INQ 

0 

0232 

POODE 

01 5A 


SQN 

LC31 

0233 

POOOF 

D822 


RAO'*- 

LCCTR 

0234 

PQOEQ 

E821 


LDQ^ 

LCCTR 

0235 

PO DEI 

EA 24 


LDQ» 

LGATB-, Q 

0236 

P00E2 

4820 


STQ^ 

LCADO 

0237 

P00E3 

G81E 

LC32 

LOA* 

LCCTR 

0238 

POOE4 

0122 


SAP 

LG32XX 

0239 

PD0E5 

OCDl 


ENQ 

XLCN-WLCN 

0240 

POOE6 

1CD9 


JMP» 

JWLCI 

0241 

P0 0E7 

D81A 

LC32XX 

RAO*^ 

LCCTR 

0242 

PQ0E6 

18DE 


JMP^ 

LC3 

0243 

P00E9 

C819 

LC31 

LDA* 

LCADD 

0244 

POOEA 

5101 

LC311 

RTJ- 

LOA , I 

0245 

POOEB 

4819 


STQ’*^ 

LCyAOD 

0246 

PQOEC 

6817 


STA^ 

LGISAD 

0247 

P 0 DED 

0874 


EAQ 

A 

0248 

PO OEE 

0112 


SAN 

LG33 

0 2 49 

POQEF 

D813 

LC312 

RAO* 

LCADD 

0250 

PQOFO 

18F2 


JMP*^ 

LC32 


CHECK FOR NEW ADDRESS FLAG ($FFFFi 

SKIP IF NOT »»SYSCOP 2.0 

»*SYSCOP 2.0 

GET NEW ADDRESS ^s^SYSCOP 2.0 


GO ON TO NEXT LC SEG 


•VALID ADDRESS 
CURRENT ADDRESS 

BAD COHPARE 


N7800230 
N7800231 
N7800232 
N7800233 
N7600234 
N7800235 
N780Q236 
N7800237 
N7800238 
N7800239 
N7600 24Q 
N7800241 
N 78 00242 
N7800243 
N780 0244 
N780D245 
N780D246 
N780 0247 
N7800248 
M780 0249 
N7800250 


0252 





» * -*CHECK I 

0253 

POOFl 

0 A08 


LC33 ENA 

LCMXM-WLCN 

0 254 

P00F2 

510F 


RTJ- 

GMS,I 

0255 

P0 0F3 

0 AQC 


ENA 

LLCM2 

0256 

POOF4 

5111 


RTJ- 

MOP. I 

0257 

PQ0F5 

C8QD 


LDA* 

L G A 0 0 

0258 

POOF5 

5103 


RTJ- 

CON, I 

0259 

POOF7 

413C 


STO- 

LCM4V1,I , 

0260 




CONS 

TR 2,LCTSA0,LCM4V2,WLC 

0260 

PD0F8 

OA 43 




0260 

P0DF9 

OG40 




0260 

PO0FA 

510D 




0260 

POOFB 

0 0 0 2 




0260 

POOFC 

00 09 




0261 




LISTIT LCM4 

0261 

POOFO 

QA16 




0261 

POOFE^ 

0 C 35 




0 261 

POOFF 

5105 




0262 

POlOO 

18 EE 


JHP» 

LC312 

0263 

POlOl 

00 00 


LCCTR •NUM 

0 

0264 

P0102 

0 000 

• 

LCAOD NUM 

0 

0265 

P0103 

00 02 


BZS 

LCISADI2) MUST 8 

026 6 


0104 

P 

LCVADD EGU 

LCVADOTLCISAD^I) 

0267 




V- 


0258 


0105 

P 

LCATB EQU 

LCATB I* } 

0269 

P0105 

FFFF 


NUM 

3FFFF 

0270 

P0106 

OOB5 


ADC 

$B5,FNR,COMPRQ,'M.ASKT 


P0107 

7FFF 

X 




JUST BEFOR LCVADD 


^»SYSCOP 

’^^‘SYSCOP 

’^^SYSCOP 


N780 

N780 

N78Q 

N780 

N780 

N780 

N78Q 

N780 

N780 


0252 
0 253 

0254 

0255 
0 25 b 
0 25 7 

0258 

0259 
0 260 


2.0 
2. 0 
2.0 


N7800261 


N7800262 

N7800263 

N7880264 

N7806265 

N7800266 

N780G267 

N7800268 

N7800269 

N7800270 



COIST 


PAGE 11 


DATE? 08/19/99 



P0108 

7FFF 

X 









P0109 

7FFF 

X 








D271 

PDIDA 

FFFF 



MUM 

SFFFF 


»»SYSCOP 

2.0 

N7800271 

0272 

POlOB 

00B9 



AOC 

$89»R'EQXT, VOLR, VOLA t LUA RS , SABS 



N78G0272 


POIOC 

7FFF 

X 









POIOD 

7FFF 

X 









POlOE 

7FFF 

X 









POlOF 

7FFF 

X 









POllO 

7FFF 

X 








027 3 

PDlll 

FFFF 



MUM 

SFFFF 


^^■SYSCOP 

2.0 

N7800273 

0274 

P0112 

OOEA 



ADC 

$EA»OISPXX 


^^‘SYSGOP 

2.0 

N780G 274 


P0113 

7FFF 

X 








0275 

P0114 

FFFF 



MUM 

SFFFF 


^«^SYSCOP 

2.0 

N7800275 

0276 

P0115 

00F4 



ADC 

$F4^H0NI ■ 


^»SYSCOP 

2.0 

N78Q0276 


P0116 

7FFF 

X 








027 7 

poll 7 

FFFF 



NUM 

SFFFF 


»»SYSCOP 

2.0 

N78G0277 

0278 




¥ 



2 CARDS DELETED 



N78C0278 

0279 

P0118 

00 FE 



ADC 

$FE, ALLIN 


^»SYSGOP 

2.0 

N7800279 


P0119 

7FFF 

X 








0260 

POllA 

QOOO 



NUM 

0 

END OF TABLE 



N780028D 

0281 

POllB 

■’FFF 

X 

HSQSF8 

ADC 

IPROC 

HSOS VALUE FOR $F8 



N7800281 

0282 

POliC 

7FFF 

X 

TSF8 

ADC 

TSIPP.C 

IIMESHARE VALUE FOR $F8 



N7800282 

0284 

POllO 

00 03 



BZS 

LCFIL fSEGSIZ- 

^^^WLC) 



N780 0284 


C^) 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


COIST 


028 6 




0287 




0288 




0289 




0289 

0120 

P 


0289 

0003 



0289 

0180 

P 


0289 

0181 

P 


0289 

0182 

P 


0289 

0183 

P 


0289 

0134 

P 


0289 

0185 

P 


0289 

0186 

P 


0289 PD120 

0000 




PAGE 12 

LOCORE ANALYSIS 
STRTSG XLC 


OATES 08/19/99 

PART X 


N780D236 

N7800287 

N78Q0288 

N7800289 


0 

291 

PG121 

C8 

60 

LOA* 

G 

292 

PD 122 

01 

03 

SAZ 

0 

293 

P0123 

CO 

00 

LDA 



P0124 

51 

OB 

0 

294 

PQ125 

68 

06 

STA^ 


XLCIFG 

LC4 

= X$510D+ArA 
LC42 


N7800291 

N780D292 

N7B00293 

N78Q0294 


0296 



0297 

P0126 

0 C02 

0298 

P0127 

485D 

0299 

P0i28 

COOO 


P0129 

OOFS 

0300 

P012A 

0 834 

Q3G1 

P0128 

5101 

0302 

P012C 

6A18 

0303 

P012D 

8822 

030 4 

P-012E 

COOO 


P012F 

00E9 

0305 

P0130 

5101 

0306 

P0131 

5101 

0 30 7 

PG132 

0112 

0308 

PO 133 

01 61 

0309 

P0134 

0851 

0310 

P0135 

E64F 

0 311 

P0136 

ODFE 

0 312 

P0137 

01 71 

0313 

PQ138 

18EE 

0314 



0315 

P0139 

E8 OF 

0316 

P013A 

C80O 

0317 

P013B 

5113 


L 

LC43 

‘f- * ^ 9- 

ENQ 2 
STQ’^ XLCC2 
LDA =N$F5 

»CORF BOUNDS 
SAVE INDEX 





LC42 

AAa A 
RTJ- LOA.I 
■ STA» LC4TP,Q 
TRA Q 
LDA =N?E9 

GET VALUES 







RTJ- 

LDA a 


RTJ- 

LDA»I 


SAN 

LC44 


■ SQP 

LC44 

L C 4 4 

RAO^ 

XLGC3 

LDQ» 

XLCC2 


INQ 

-1 


SQM 

LC5 


JHP* 

LC43 

iC5 

LOQ* 

LC4TP41 


LQA^ 

LC4TP 


RTJ- 

CMP, I 


GET ADOR OF EX- CORE TABLE 
GET CONTENTS OF HOO-F SWITCH 
SKIP IF 65K.GT.7FFF LEGAL 
SKIP IF ADDRESS OK 
ERROR IF NEG ADDRESS 
CHECK INDEX FOR DONE 

ALL IN 
LOOP 

A=f $F5) ,Q=t$F6J 


»»HSOS 4. 

^’MSOS 4. 
»=^HSOS 4. 
♦’^MSOS 4. 

’■^HSOS 4. 

»»MSOS 4. 
♦^HSOS 4. 


N7800296 

N78Q0297 

N7800296 

ON7800299 

N7800300 
N780G3Q1 
N780Q3G2 
GN780 0 3Q3 
N78G0304 

N78e0305 
CN780 0 30 6 
0N7800307 
ON78G0308 
N7800309 
N780 0 318 
0N7800311 
N78G0312 
N7800313 
N7800314 
ON7800315 
0N7800316 
N7800317 


G 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


COIST 
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DATE.-: 08/19/99 



o 

o 

o 

o 

o 

o 

! o 


C) 

*>v.' 


-’^MSOS 4.0N78D0318 
N7800319 
N760Q32Q 

N7800321 n 

N78QG322 ^ 

N78D0323 
N780 0324 

N7800325 O 

N7800326 ^ 

N7800327 
N780 D328 

N7800 329 O 


o 

N7800331 

O 


o 


o 


o 


o 


o 


o 


o 


o 


o 


o 


C..) 

o 

o 

o 

o 


coisr 


0333 



0334 



0335 ■ 



0336 

0336 

0180 

P 

0336 

00 04 


0336 

OlEO 

P 

0336 

OlEl 

P 

0336 

51E2 

P ^ 

0336 

D1E3 

P 

0336 

01E4 

P 

0336 

01E5 

P 

0336 

01E6 

P 

0336 P0180 

0 0 00 



PAGE 14 

LOCORE ANALYSIS 
STRTSG XL! 


DAIE: Q8/19/99 

PART XLl 


N7800333 

N7800334 

N7800335 

N7800336 


o 

o 

o 

o 

o 


o 


o 


O 

0338 

PD 181 

C8 62 



,LOA'» 

XL! Cl 

033 9 

P0162 

6844 



STA«^ 

L14TP 


0340 

P0183 

C861 



LDA» 

XL1C2 


0 341 

P0184 

6843 



STA* 

L14TP»1 

o 

0342 

P0185 

E861 



Loa*^ 

XL1C4 

0343 

P0186 

4842 



STQ» 

L14TPa-2 


0344 

P0187 

C85A 



L’DA'^ 

XLIIFG 


0345 

P0188 

0111 



SAN 

LC5113 

o 

0346 
034 7 

P0189 

181F 


»• 

JMP’^ 

LC5119 


0348 

0349 




¥ 



o 

0350 

P018A 

COOQ 


LC5113 

LQA 

= N$€9 


P018B 

0 0E9' 





0351 

poiac 

51 OB 



' RTJ- 

AfA,I 


0352 

P016D 

Q90A 



INA 

10 

o 

0353 

P018E 

5 1 OB 



RTJ- 

AT A, I 

0354 

PQ18F 

0102 



SAZ 

LG5114 


0355 

P0190 

€838 



LDQ» 

L14TP+2 


0356 

P0191 

1817 



JMP» 

LC5119 

o 

035 7 

P0192 

GAOF 


LC511 4 

ENA 

15 

0358 

P0193 

6853 



STA^ 

XL1C4 


0359 

P0194 

0 AOl 



FNA 

1 


0360 

P0195 

684€ 



STA» 

XLICI 

o 

0361 

P0196 

EODO 

X 


LDQ 

=XALCLGH 


P019 7 

7FFF 

X 





' 0362 

P0198 

0814 


LC511 5 

TRQ 

A 


0 36 3 

P0199 

510B 



RTJ- 

ATA,I 

o 

0364 

P019A 

0 103 



SAZ 

NXTACL 

0365 

P0198 

0902 



INA 

2 


0366 

P019C 

8847 



Am* 

XLl Cl 


0367 

P019D 

6846 



SIA* 

XLICI 

o 

0368 

P019E 

C8 48 


NXTACL 

LOA* 

XL1C4 

0369 

P019F 

0 9FE 



INA 

-1 


CORE LENGTH CALCULATION 
IN AUTOLOAO IMAGE, CALC 
ALLOCATABLE CORE LENGTH 
IS UNPROTECTED IN PART 


FOR COMPARISON 

N7800336 

N7800339 

N7800340 

N7800341 

O 


N78G0342 

N780Q343 

O 

OLOAD IMAGES 

N780Q344 

N78Q0345 


LLOCAIABLE 

N780D346 

N7800347 

o 

ULATE 

N780C348 
N780 0349 


0 

N780e350 

o 


■ N7808351 

N780 0 352 
N7800353 


■ o 

BLE CORE LENGTH 

N78Q0354 


HAS NO RELATION TO UNPROTECTED CORE 
SET INDEX FOR 'ALCLGH' 

SET INITIAL LENGTH FOR ALLOCATABLE 

ADDRESS OF ALLOCATABLE CORE 

LENGTH TABLE IN AUTOLOAD IMAGE SPACE 

IF AREA IS ZERO, GET NEXT LENGTH 
IF NOT, ADJUST FOR THREAD AND LENGTH 

LAST AREA 


N78GI3355 
N7800 356 
N7800357 
N788035e 
N780Q359 
N76Qt3 36fl 
N78U0361 


N780 

N780 

N780 

N780 

N78D 

N780 

N780 

N780 


0 362 
Q363 

0364 

0365 

0366 

0367 

0368 

0369 


O 


O 


O 


o 


o 


o 


o 


o 


COIST 
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OATEi 08/19/99 


C) 

o 

o 

o 

o 

o 

o. 

o 

o 

o 

o 

o 

o 

O 

I 

o 

o 


0370 PQIAO 0103 

0371 POlAl 6845 

0372 P01A2 QDOl 

0373 PQ1A3 18F4 

0374 P01A4 E83F 

0375 PD1A5 FOOO 
PD1A6 7FFF 

0376 P01A7 0002 

0377 PQ1A8 4820 

0378 P01A9 C81E 

0379 POIAA 09FD 

0380 POIAB 5113 

0381 PQIAC 0123 

0382 POIAD 0900 

0383 PDIAE Cl.ll 

0384 POIAF 0836 

0385 POIBO OA06 

0386 P0181 510F 

0387 P01B2 0816 

0388 P01B3 C814 

0389 PG1B4 09FE 

0390 P01B5 6812 

0391 

0391 P01B6 0A46 
0391 P01B7 0C54 
0391 P01B8 5100 
0391 P01B9 0002 

0391 POIBA 0 0 03 

0392 

0392 P0188 0A48 
0392 POIBC QC59 
0392 POIBO 510D 

0392 POIBE 00 01 
C392 POIBF 0001 

0393 POICO C825 

0394 PfllCl 0107 

0395 P01C2 QAOC 

0396 P01C3 5111 

0397 P01C4 OAIA 

0398 P0rG5 1809 

0399 

0400 P01C6 0003 
04D 1 

0402. PD1C9 014C 

0403 POICA C818 

0404 PGICB 0111 

0405 POICC 014C 
0 ^ 0 ft 

040 6 POICD 0A16 
040 6 POICE 0C4C 
040 6 POICF 5105 
0407 POIDG OCOl 
0A08 POl'Dl ICAE 


X 

X 


SAZ 'LC5117 YES 

STA» XL1C4 NO, GET NEXT LENGTH 

INQ 1 ADJUST FOR NEXT TABLE ENTRY 

JMP» LC5115 

LC5117 XLICI Q=I$F7) CALCULATED FROM LENGTH TABLE 

ADD =XAREAG ADD START OF ALLOCATABLE CORE 


INQ 2 

LC51L9 STQ^ L14TP+2 
LDA^ L14TP + 1 
INA -2 
RTJ- CHP,I 
SAP LC52 
INA 0 
SAN LC52 
RAO^ XL1S3 

LC52 ENA LCMXN-XLIN 
RTJ- GHS,I 

LC521 RAO-» L14TP+2 
LDA* L14TP*1 
INA -1 


ADJUST FOR LAST THREAD 

A=l $F6)-2 
COMPARE 

UNPROT TOP .LT. BOTTOM UNPROT 

PUT AWAY IN MESSAGE 
SUMP BOTTOM 


STA^ L14TP+1 

LC522 CONSTR 2 , LI 4T P, LGM6V1 , XLl , 7 



CONSTR l,L14TPi'2 ,LCH6V2,XL1,0 



LDA^^ XL1C3 
SAZ LC53 

DO SUPPORT MESSAGE 


ENA LLCM2 
RTJ- HOP, I 
ENA LLCM5 

ERROR MESSAGE 


JMP* LC54H 


L14TP 

BZS L14TPT3) 


LC53 

RAO- LCM6, I 
LDA*^ XLIMFG 

MAKE SUPPORT MESSAGE 


SAN LC54 
RAO- LCM6,I 

MAKE NOT RELATED 

LC54 

LISTIf LCM6 



ENQ YLCN-XLIN 
JMP» IXLIJ 



N78Q037D 

N7800371 

07300372 

N7800373 

N760Q374 

N70OO375 

N7800376 

N7800377 

N7800378 

N7800379 

N78D038C 

N7800381 

N7800382 

N7800383 

N78003S4 

N7800385 

N780Q386 

N7BG0387 

N780Q388 

N780D369 

N7800390 

N78Q0391 


N78DG392 


N78G0393 
N78SQ394 
N7800395 
N7800396 
N7800397 
N7800398 
N7800399 
N780S400 
N78Q0 401 
N7800 402 
N780Q‘403 
N7800 404 
N78flG 405 
N78Q 0406 


N70OO4O7 
N7800 408 


O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


COIST 
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date: 08/19/99 


C) 

o 

041D P01D2 OOOE BZS XLl FI L ( S EGS IZ * XL 1 ) 

O 

O : 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 

N7800410 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


COISI 
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DATE: 08/19/99 


r'":. 

O 

o 

o 

o 

o 

Q 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


0 A1 2 ^ 

0413 - LOCORE ANALYSIS PART Y 

0414 

0415 STRTSG YLC 

0415 ■ OlEO P 

0415' 0 0 05 

0 415 0 2 40 P 

0415 02 41 P 

0 415 C2 42 P 

0 41 5 0 2 43 P 

0 415 0 2 44 P 

0 415 0 2 45 P 

0 415 0 2 46 P 

0415 POIEO 0000 


0 41 

7 

POIEI 

C860 

L0A» 

YLGIFG 

041 

8 

P01E2 

0104 

SAZ 

LC6 

041 

9 

P01E3 

cooo 

LDA 

=X$5100*ATA 



P01E4 

5108 



042 

0 

P01E5 

6803 

STA^ 

LC61 

0 42 

1 

POIE e 

6806 

STA^ 

1C62 


0 42 3 






HECK MAXSEC » 

0424 

P01E7 

C816 

LC6 

LDA-^ 

LC6MS 


0 42 5 

P01E8 

5101 

LC61 

RTJ- 

L0A,I 


0426 

P01E9 

6829 


STA’^ 

LC6TP+1 


0427 

POIEA 

C813 


LDA-^^ 

1C6MS 


0428 

P01E8 

0 9FE 


INA 

-1 


0429 

POIEC 

5101 

• LC62 

RU- 

LDA, I 


0430 

POIED 

6824 


ST A"’ 

LC6TP 


0431 

PQIEE 

QA 05 


ENA 

LCHXN-YLCN 


0432 

POIEF 

510F 


Rf J- 

GMS,I 


0 43 3 




CONSTR 2,LC6TP, 

LCM8V1,YLG, 0 

0433 

PCIFO 

0 A31 





0433 

POIFI 

GC 6E 





0 43 3 

P01F2 

510D 





0 433 

P01F3 

0D02 





0 43 3 

P01F4 

•00 01 





0434 

P01F5 

C61t3 


LOA» 

LC6TP+1 


0435 

P01F6 

0132 


SAM 

LC621 

ILLEGAL LS8 

0436 

P01F7 

C81A 


LOA^ 

LC6TP 


043? 

P01F8 

0105 


SAZ 

LC63 

MS3 MUST BE ZERO 

0438 




ERROR MESSAGE 

0439 

P01F9 

0 AOC 

LC621 

ENA 

LLCM2 


0440 

POIFA 

5111 


RTJ- 

HOP ,I 



N7800 412 
N7800 413 
N7800414 
N7800 415 


N78Q0 417 
N7600418 
N780 0419 

N7800420 

N7803421 


N7800423 
N7800424 
N780 0425 
N78QQ426 
N780Q427 
N7800428 
N7800429 
N7800430 
N7800431 
N78QQ432 
N7800433 


N7800 434 
N78Q0435 
N7800436 
N7800437 
N7880 438 
N78G0 439 
N780044D 


L-' 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 



COIST 
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DATES 08/19/99 


0441 

POIFB 

OAOE 

ENA 

LLCM7 

N78Q0 441 

0 442 

POIFC 

1807 

JMP» 

LC65+1 

N7800 442 


0444 

P.D IFD 

7FFF X LC6MS- 

AOC MAXSEC 


N7800444 

0445 

POIFE 

D167' LC63 

RAO- LCH8,I 

SUPPORT MESSAGE 

N780 0 445 

0446 

POIFF 

C843 

LDA* YLCHFG 


N7800446 

D447 

PD200 

0111 

SAN LC65 


N78Q0447 

0448 

P0201 

0167 ■ 

RAO- LCM8,I 

MAKE NOT REIARED 

N78GD448 

0449 


LC65 

LISTIT LC«8 


N7800449 

0449 

P0202 

OAOA 




0449 

P0203 

0C67 




0449 

P0204 

5105 





0451 



¥ 

* , ^ 

» 9 - 

*CHECK 

IF LOCORE OONE ^ 


9^ 


N78Q0451 

0452 

P0 20 5 

0 8 44' 

LC7 

CLR 

A 






N780 0 45 2 

0453 

P02O6 

663C 


STA*^ 

YLSMFG 

CLEAR 

ERROR MESSAGE 




N7800453 

0454 

P0207 

G83A . 


LDA'^ 

YLCIFG 






N7800454 

0455 

P02G8 

0114 


- SAN 

LC7i 

DONE- 

60 ON 




N780 0 45 5 

0456 

P0209, 

0A05 


ENA 

L1GM1-LLCM2 

SET 

FOR AUTOLOAD IMAGE 




N780Q 456 

G45? 

PQ20A 

68.37 


STA» 

YLCIFG 






N7800457 

0458 

P020B 

0CF3 


ENQ 

VLCN-TLCN 






N7800458 

0459 

P020G 

1CD3 


JMP« 

ITLC? 

EXIT 





N76Q0 459 

0460 



* 








N78e046Q 

0461 

P020D 

0 8 44 

LC71 

' CLR 

A 






N7800461 

0462 

P020E 

6833 


STA» 

YLCIFG 






N7800 462 

0463 

P020F 

OCOl 


ENQ 

PLN-YLCN 

GO TO 

PRIORTY CHECK 




N7800463 

0464 

P0210 

ICCF 


UMP* 

mcj 






N7300464 


0466 



9 


N78Q0466 

0467 

P0 211 

0002^ 

LC6TP BZS 

iC6TP(2 3 

N7800467 

0469 

P0 213 

Q02D 

BZS 

TLCFILI SEGSIZ-^^fVLC) 

N7800469 


c 

c:- 

o 

o 

o 

o 

o 

o 

o 

o 

o 


COIST 


0471 



0472 


» 

0473 



0474 

0474 

0 2 40 

P 

0474 

0 0 06 


0474 

02A0 

P 

0474 

Q2A1 

P 

0474 

02A2 

P 

0474 

02A3 

P 

0474 

0 2A4 

P 

0474 

0 2 A5 

P 

0474 

02A6 

P 

0474 PQ240 

0 000 



PAG€ 19 

PRIORITY LEVEL 
STRTSG PL 


DATEl 08/19/99 

ANALYSIS 


0476 P0241 
P0 242 

0477 P0243 

0478 P0244 

0479 P0245 

0480 P0246 

0481 

0481 P0247 
0481 P0248 
0481 PQ249 
0481 P024A 

0481 P0248 

0482 P024C 

0483 P0240 

0484 P024E 

0485 P0 24F 

0486 PD250 

0487 

0487' P0251 
0 487 P0 252 
0467 P0253 

0488 PG254 

0489 P0255 
0 49fi P0 256 
0491 PQ257 
049 2 

0493 P0258 

0494 P0259 


GOOD 

QOEF 

5101 

6816 

0A05 

510F 

OAIA 
0C2A 
5100 
00 01 
OQOl 
C8Q.E 
09EF 
01 29 

0900 
0134 

DAOC 

0C16 

5105 

1807 

C805 PLl 

0901 
0123 

. ^ 

OAOC PL2 
1804 


LDA =X$EF GET PRIORITY LEVEL 

RTJ- LDAiI 
SIA-^ PLPL 

ENA PLMXN-PLN GET HESSAGE BLOCK 

RTJ- GMS,I 

CONSTR 1 »PLPL,PLM3 Vl^PLt 0 


LDA’ PLPL 
INA -16 

SAP PL2 ERROR 

INA -3»-16 

SAM PLl BELOW 3 

LISTIT PLHl 


JMP’- PL3 
LDA’ PLPL 
INA 1 
SAP PL3 

ENA LPLH2 
JMP’ PL329-1 


NO ERROR 
ERROR HESSAGE 


0^96 P025A 0 0 09- PLPL NUH 0 

(149 7 ’ 

0498 P0258 D123 PL3 RAO- PLM3,I SUPPORTS ALL ERRORS 

0499 PL32 LISTIT PLM3 





O 

N78Q0471 

□ 

N7800 472 
N7800473 
N7800 474 

o 


o 


o 


o 

N76D0476 

o 

N7800477 
N78Q0478 
N7800479 
N7800 480 

o 

N7800 481 

o 


N7800482 

o 

N780Q483 


N780D484 


N78QQ485 


N7800486 

o 

N780Q487 

N7800488 

o 

N78Q0 489 


N7800‘49D 


N7800 491 

o 

N780G492 

N7800 493 


N780Q494 



o 

N7808496 


N78Q 0497 


N7800 498 

o 

N780 0 499 


o 


O 


COIST 
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DATES 08/19/99 


0499 
0499 
0499 
050 0 

0501 

0502 

0503 
050 4 


P025C 
P025D 
P025E 
PC 25F 
P0260 
P0261 
P0 262 


GADS 
0C23 
5105 
C 8 42 
4345 
0C07 
ICDD 


CLP Q 
STQ» PLC3 
ENQ NEXTN' 
JM.P» fPU 


■CLEAR ERROR FLAG FOR NEXT MODULE 
GO ON TO NEXT MODLE LOADED 


N7800500 
N78005D1 
N7800 502 
N7B'Q 0503 
N78Q0504 


0506 P0263 003D 


BZS PLFIL ISEGSIZ-^+PO 


N780Q506 


■ O 


r'\ 

Vv- 



COIST 
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DATE? 08/19/99 


c 

C 

05D8 






N780 0 508 

o 


050 9 




CORE DUMP 


N7800509 



0510 






N780051Q 


O 

0511 

0511 


02A0 P 


STRTSG OP 


N7800 511 

o 


0511 


0 0 07 







0511 


0300 P 






o 

0511 


0301 P 





o 

0511 


0302 P 






0 511 


0303 P 







0511 


0304 P 






o 

0511 


0305 P 





Q 

0511 


0306 P 







0511 

P02A0 

00 00 






o 








o 

o 

0513 






N7800 513 


05li^ 

PS2A1 

0A05 

DPI 

ENA OPMXN-OPN 


N78D0 514 



0515 

P02A2 

510F 


RTJ- GHS,I 

ASK FOR REQUEST 

N7800515 


o 

G51& 

0516 

P02A3 

0A03 

DPli 

WRITIT DPMI 


N70OO516 

o 

0516 

P02A4 

QC16 






0516 

0517 

P02A5 

5107 

th 


■read in request 

N7800517 


o 

0518 

0518 

P0 2A6 

OAOE 


ANSWER DPAl 

N7800 518 

C) 



0518 

P02A7 

OC 59 






o 

0518 

0519 

P02A8 

5109 




N780Q 519 

■ o 

0 52 0 

PC2A9 

C15A 


LDA- QPAH-1,1 

GET INPUT 

N780052D 


0521 

P02AA 

9 0 00 


SUB =A*Z 

-^Z 

N7.8fi0 521 




P0 2A8 

2A5A 






o 

0522 

PO 2AC 

0 105 


SAZ DP2 

*Z REQUEST 

N7 80Q 52 2 

o 

0523 

P02AO 

0908 


INA -$52*-$5A 

-R^^Z 

N7800523 


0524 

P02AE 

0107 


SAZ D P3 

REQUEST 

N783D524 



0525 

P0 2AF 

890E 


INA -$44+S5 2 

-DfR 

N78Q0525 


o 

0526 

PD2B0 

0107 


SAZ 0P4 


N78Q0526 

o 

0 52 7 

P02B1 

1823 


JMP* DPllO 

TRY AGAIN 

N7600527 


o o 



0529 




■«^TURN OFF * 





9. 

9^ 

» N78C0529 


o 

0530 

0530 

P0 2B2 

0AO7 

DP2 LISTIT DPM3 








N780B 530 

0 


0530 

P02E3 

0C51 












0530 

P02B4 

5105 









N7800531 


o 

0531 

PO 2B5 

1522 

JMP- t$22l,I 

EXIT 







0 

o 













0 

o 













0 



D533 
C534 
0 53 5 


0537 

0538 

0539 

0540 

0541 

0542 

0543 

0544 

0545 
Q546 

0547 

0548 

0549 

0550 

0551 

0552 

0553 

0554 

0555 
055 6 

0557 

0558 

0559 

0560 

0561 

0562 
0 563 

0564 

0565 
0 56 6 

0567 

0568 

0569 

0570 

0571 

0572 


0574 



COIST 
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P0206 

P02B7 

OCFB DP3 

1CE8 

¥ ^ 
ENQ 
JMP» 

OPN-DPN 

top) 

^RESTART 
EXIT TO 

PACKAGE » » 

OPTIONS 




* N7800 533 
N780 0534 
N780 0535 







^DUMP * «• 



♦ -¥• » 

N7800537 

P02B8 

0 8 44 

DP4 

CLR 

A 

SET UP 




N7800538 

P0 2B9 

6841 


STA + 

DP4CTR 





N780Q539 

P0 2BA 

6841 


STA'’^ 

0P4LFG 





N7800S4D 

P02BB 

6341 


STA» 

DP4VA1 





N78Q 0 541 

P02BC 

C4E9 


LOA- 

^$E9) 




SYSCOP 2.0 

N7aOQ542 

P02BD 

6849 


STA*^ 

DPC4 

TEMPORARILY SAVE 

MODE FALG 

SYSCOP 2.0 

N7800543 



3 ?- 







N7800544 

P028E 

5 8 ID 


RIJ^ 

0P4GFD 

GET FIRST FIELD 




N7800545 

P 0 2 BF 

E847 


LOO» 

DPC4 

HOOE FLAG FROM EXTENDED 

CORE TABLE SYSCOP 2.0 

N780Q 546 

PB 2C0 

01 52 


SQN 

2 

SKIP IF 65K mode 



♦«^HSOS 4, 

ON780Q547 

P02C1 

0121 


SAP 

1 

ADDRESS OK 



»»MSOS 4. 

0N78 00548 

P02G2 

1812 


JHP» 

DPI 10 

■ ERROR 



»»MSOS 4. 

ON7800S49 

P02C3 

6840 


STA^ 

DPCl 





N78D0550 

P02C4 

C839 


LOA'» 

DP4CHR 





N780 055 1 

P02C5 

0903 


INA 

-$2C 

CHECK FOR COMMA 




N7800552 

PO 2G6 

OllD 


SAN 

DPllO 

INVALID TRY AGAIN 




N760 0 553 










N7800 554 

P02C7 

6635 

0P42 

STA-* 

0P4VAL 

CLEAR ¥ALU€ 




N7800555 

P0 2C8 

5.8 13 


RTJ» 

DP4GFD 





N76Q 0 556 

P02C9 

E8 30 


LDO» 

0PC4 

MODE FLAG FROM EXTENDED 

CORE TABLE SYSCOP 2,0 

N7800557 

P02CA 

0151 


SON 

1 

SKIP IF 65K MODE 



^’fMSOS 4. 

0N78Q 0558 

P02G8 

0138 


SAM 

DPllQ 





N7 80 0 559 






, a=uppe'R bound 




N76a056C 

P02CC 

€8 37 


LOQ» 

DPCt 

Q=LOW’ER BOUND 



*»HSOS 4. 

0N7800561 

P02CO 

5113 


RIJ- 

GMPfl 

COMPARE - AA RETURNED POSITIVE OK ^»MSOS 4- 

GN760D562 

P02CE 

0121 


SAP 

DP43 

OK 




N788 0 563 

P0 2CF 

0 8 44 


CLR 

A 

1 CELL ONLY 




N780 0 564 










N780 0 565 

P0 2D0 

6834 

0P43 

STA*^ 

DPC2 

NUM OF CELLS IS 1 

MORE 

THAN DPC2 


N78D0 566 



If- 






SYSCOP 2.0 

N780 0 567 

PO 2D1 

6834 


STA» 

0PC3^ 

INITIALIZE C3 AND 

C4 


SYSCOP 2.0 

N7800568 




STA=<^ 

DPC4 

FOR NEXT SEGMENT 



SYSCOP 2.0 

N780 0569 









SYSCOP 2.0 

N7800570 

PO 2D2 

OCOl 


ENQ 

WOPN-DPN 





N7800571 

P02D3 

ICCC 


JMP^ 

(OP5 

EXIT TO DUMP 




N7600 572 

P0 2O4 

OCOE 

DPllO 

ENQ 

LDPAl 

NULL OUT BUFFER 




N78GQ574 


COIST PAGE 23 DATEl 08/19/99 


0575 

P0 2D5 

08 04 


SET 

A 

N78Q0575 

0576 

P02D6 

63 59 

DPlii 

STA- 

0PA1,8 

N780 0576 

0577 

P0 2O7 

0DF£ 


INQ 

-1 

N780 0 577 

0578 

Pfl 2D8 

01 A1 


SQZ 

DP112 

N7800578 

0579 

P0 2D9 

18 PC 


JMP'^ 

0P111 

N780Q579 

0580 

P02OA 

18C8 

DP112 

JHP* 

BPll TRY AGAIN 

N780 0580 


0582 



* 



GETFIELD 

N780G 582 

0583 

P02QB 

0 000 

DP4GF0 

NUM 

0 


N7800583 

0584 

PD2DC 

E81£ 

DP4GF1 

LOQ» 

DP4GTR 


N780 0 584 

0585 

P020D 

G35B 


LDA- 

0PAlf2, 8 

GET NEXT CHAR 

N78Q0585 

0586 

P02DE 

E81D 



BP4LFG 


N7800 586 

0587 

PD20F 

0153 


SON 

DP4GF2 


N7800587 

0588 

P0 2E0 

081B 


RAO» 

0P4LFG 

LOWER, NEXT TIME 

N78Q 0588 

0589 

P02E1 

0FC8 


ALS 

8 

MOVE TO LOWER 

N7800589 

0590 

P02E2 

1304 


JMP^ 

DP4GF3 


N7800590 

0591 







N7800591 

0592 

PO 2E3 

0 8 42 

■D.P4GF2 

CLP 

Q 


N7800 592 

0593 

P0 2E4 

4817 


STQ» 

0-P4LFG 

UPPER NEXT TIME 

N780G593 

0594 

P02E5 

0815 


RAO» 

0P4CTR 

NEXT WORD ALSO 

N78Q0 594 

0595 







N780 0 595 

0596 

P02E6 

AOOA 

^ DP4GF3 

ANG- 

$A 

SAVE LAST CHAR, 

N780D596 

0597 

P0 2E7 

6816 


ST A'» 

0P4GHR 


N780C597 

0598 

P0 2E8 

•0 9CF 


INA 

-$30 

CONVERT TO HEX 

N7800598 

0599 

P0 2E9 

013F 


SAM 

DP4GF6 

NOT LEGAL NUM 

N7800599 

0600 

P02EA 

B9F5 


INA 

-S-3A»-$3 0 


N78005DO 

Q6G1 

P02EB 

0126 


SAP 

DP4GF5 

CHECK ALPHA 

N780 0601 

0602 

PD2EC 

090A 


INA 

$A 


N7600602 

0603 

P02ED 

OFCC 

^ DP4GF4 

ALS 

12, 


N7800603 

0 604 

PG2£E 

E8 OE 


LOQ» 

DP4VAL 

COMBINE WITH PAST VALUES 

N78Q0 604 

060 5 

P02fF 

0FE4 


LLS 

4 


N780 0605 

0606 

P02F0 

480G 


STQ» 

QP4\/Ai 


N7800 606 

0607 

P02F1 

18EA 


JMP» 

DP4GF1 

NEXT 

N7800607 

060 8 







N7600608 

0609 

P02F2 

0 9F8 

0P4GF5 

INA 

-$414-$ 3 A 

ALPHA HEX 

N7800609 

061 0 

PQ2F3 

0134 


SAH 

GP4GF6 

ILLEGAL 

N780061D 

0611 

P02F4 

09F9 


INA 

-$47+$41 


N7800611 

0612 

P02F5 

0122 


SAP 

0P4GF6 

ILLEGAL 

N780G 612 

0613 

P02F6 

0 910 


INA 

16 


N7800613 

0614 

P0 2F7 

18F5 


JMP» 

0P4GF4 


N780D614 

0615 







N78Q0615 

0516 

PQ2F8 

C8 04 

0P46F6 

LDA» 

DP4yAL 

EXIT END OF FIELD 

N7800616 

0 617 

PQ2F9 

ICEl 


JHP» 

{0P4GF01 


N7800617 

061 8 







N78B0618 

061 9 

P02FA 

0000 

DP4CTR 

NUM 

0 


N7800619 

0620 

P0 2FB 

0000 

0P4LFG 

NUM 

0 


N780 0 620 

0621 

P0 2FG 

oooo 

DP4VAL 

NUM 

0 


N780Q621 

0622 

PQ2F0 

0000 

DP4CHR 

NUM 

0 


^ N780Q622 


r;) 


o 

GOIST 
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o 

0624 P02FE 00 02 

BZS DPFIL (3EGSIZ-»+DP) 


N780O624 




O 


O 


O 

O 

O 

O 

O 

O 

O 

O 

O 

O 

O 

o 

O 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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P030D 


0300 
0 0 06 

0360 

0361 

0362 
0 3 63 
0 3 64 
0365 
0 3 66 
0 000 


DUMP CORE PART W 


STRTSG WDP 


N780Q626 

N7800627 

N7800628 

N7800629 


W0PC3 AND WDPC4 = 0 ON ENTRY 

W0PC3 = LAST CHAR OF LAST LINE 

WDPC4 = -1, NOT A MATCH 
0» MATCH 

1, MATCH, BUP LINE PRINTED 


SYSGOP 2.0 
SYSCOP 2,0 
SYSCOP 2.0 


P0301 C862 DP5 LOA^ WOPCl 

P0302 684C STA* DP5BDF 

P03C3 §842 GLR Q 

P0304 C85F OP51 LOA» WOPCl 

P0305 085E RAO» WOPCl 

P0306 5101 RTJ- LDA, I 

P0307 6A48 STA* OP5BUF*l,Q 

P0308 6845 STA» DP8 0 

P0309 CB50 LOA-» WDPC4 

P030A 0135 SAM DP518 

P0 30B G6SA LOA'^ W9PC3 

P030C B841 EGR» DP8Q 

P030D 0102 SAZ OP51B 

P030E OAFE ENA -1 

P030F 6857 STA'» WOPC4 

P0310 0814 DP51B TRR A 

P0311 9853 SUB- WOPC2 

PG312 012A SAP OP53 

P0313 0DF8 INO -7 

P0314 0154 SQN DP52 

PQ315 OOOl INQ 1 

P0316 D84€ RAO» WDPC2 

P0317 G84C LDA'» WOPCl 

P0318 683F STA* OP58UF»-9 

P0319 OOF6 OP52 INQ -164-7 


GET START 


GET CELLS 


SAVE CURRENT WORD 

SKIP IF MISMATCH ALREADY FOUND 
CHECK WITH LAST WORD OF LINE FOR MATCH 


SET FLAG FOR A MISMATCH 


ALL DONE Q HAS HUM OF CELLS -1 


N7800631 
N780D 632 
N7800633 
N7800634 
N7800635 
N780Q636 
N7808637 
N78Q0638 
N78Q0639 
N7880640 
N7800641 
N78Q0642 
N780Q643 
N780G 64i* 
N789Q645 
N7S0 D6 h& 
N78Q 0 647 
N7880648 
N7890649 
N7800650 
N78U0651 
N7800 652 
N78B0 653 
N780Q654 
N780 Q655 
N7800656 
N7B0 0 65.7 
N7880658 
N78G0659 
N7800660 
N7800661 
N7800662 
N7800663 
N780 0 664 


CQIST 
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0 66 5 
0666 

0667 

0668 
0559 

0670 

0671 
05 72 

0673 

0674 

0675 

0676 
0577 
0678 
0 679 
068 0 
0681 
0682 
0 683 
06B4 
0685 
05 3 6 
0687 
0687 
0687 
0687 
066 7 
0687 
068 8 

0689 

0690 

0691 

0692 
0593 
0634 

0695 

0696 

0697 

069 8 
0599 

070 0 
070 1 

0702 

0703 

0704 

0705 
0 70 6 
0707 
070 8 

0709 

0710 


P0 31A 

0162 



SQP DP53 

DONE WITH BUFFER 

N780Q665 

P031B 

QDll 



INQ 17 

BUMP 

N7800666 

P031C 

18E7 



0P51 


N7800667 

P031D 

C847 


0P53 

LOA* W0PC2 


N7800 668 

P031E 

Og.E'E 



INA -17 


N7800669 

P031F 

£845 



STA^ W0PC2 

REDUOE NUMBER TO DUMP 

N780D670 

P0320 

0122 



SAP 0P54 

MORE TO DO 

N7800671 

P0321 

0002 



INQ 2 


N78Q0 672 

PD322 

4810 



STQ» DP5NUM 


N7800673 




♦ 



N7800674 

P0323 

0 A04 


0P54 

ENA QPMXN-WOPN 

GET MESSAGE BLOCK 

N7800675 

P0324 

510F 



RTJ- GMS,I 


N7800676 

P0325 

C841 



LOA«^ W0PC4 


N780 0677 

P0326 

0137 



SAM 0P54B 

NO MATCH, RESET FLAG AND PRINT 

N78Q0678 

P0327 

0101 



SAZ 0P54A 

MATCH, GO PRINT ** 

N780D679 

P0328 

181E 



JMP» DP57 

»* ALREADY PRINTED - CONTINUE ON 

N7800680 

P0329 

QA09 


0P54A 

ENA 9 

DUPLICATE LINE 

N7800681 

P032A 

0C69 



ENQ 0PH4 

PRINT ** 

N7600682 

P032B 

5105 



RTJ- LST,I 


N7800683 

P032C 

■D83A 



RAO* W0PC4 

SET PRINT FLAG TO 1 ■ 

N7B00 684 

P0 3213. 

1819 



■ JNP* 0P57 

• RETURN FOR NEXT LINE’ 

N7800685 

P032E 

0838 


DP54B 

■ RAO* W0PG4 

RESET FLAG TO ZERO 

N7800686 




OP 5 5 

•CONSTf? 18,DP5BUF, 

0PM2^H,WDP, 1 

N7800687 

P032F 

DA4E 






P0 330 

OCIB 






P0331 

5100 






P0332 

0012 






P0 333 

0 0 02 







0332 

P 


EQU OP5NOM(DP553-3:) 

N7800688 

P0334 

EOFB 



LOQ- $FB 

SET UP OUTPUT LOGICAL UNIT 

N7800689 

P0335‘ 

FOOD 

X 


ADQ =XL0G1A 


N7800690 

P0336 

7FFF 

X 





P0337 

E622 



LOQ- I$22),Q 


N7800691 

P0338 

C208 



to A- B,Q 


N78B0692 

PG339 

0F4B 



ARS 11 


N780O693 

P033A 

A005 



AND- 5 

MASK CLASS CODE ONLY 

N7809 694 

P0 33B 

09F9 



INA -6 


N780 0695 

P033n 

0105 



SAZ OP56 

TYLETYPE DEVICE FOR, LIST 8 WOROS/LINE' 

N7809696 

P033D 

CQOO 



LOA -N$2O20 

BLANK OUT BUFFER BETWEEN LINES 

N7800697 

P033E 

2020 






P033F 

6135 



STA- DPM2V2,I 


N78Q0698 

P0340 

6136 



STA- DPM2V2S-1,! 


N7800699 

P0 341 

6137 



STA- DPM2V2«-2»I 


N7800700 




% 



N78S0701 

P0 342 

C8EF 


0P5 6 

LDA* DP5NUH 

LENGTH OF MESSAGE 

N7800702 

P0343 

20 0 4 



MUI- 4 


N78907O3 

P0344 

QCIA 



ENQ DPH2 


N78007Q4 

P0345 

5105 



RTJ- LST,I 


N 780 0 70 5 

P0346 

C807 


DP57 

LDA* DP80 


N7800706 

P0347 

681E 



STA* W0PC3 

UPDATE LAST WORD OF PRINT LINE 

N78Q0707 

P0348 

G81C 



LDA* W0PC2 


N7800708 

P0349 

0131 



SAM 0P6 

ALL DONE 

N7800709 

PG34A 

1 8B6 



JMP* DP5 


N78S 0710 


COIST 


0711 

0712 

PQ34B 

OCFE 

DP6 

END 

0713 

P034C 

1C83 


JMP»" 

0714 

P034O 

00 01 


BZS 

0715 

0716 

PQ34E 

0D12 

53^ 

BZS 


O 

Q 0718 P0360 ODOO BZS 

O 

o 
o 
o 
o 
i o 
o 
o 
o 
o 
, o 
I o 
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OPN-WDPN 

fWOP) 

DP80!1) CIRRENT WORD 

DP5BUF ( IB) 


WDPFIL(SEGSlZ-'^ + WDP) 


o 

N78Q0 711 
N7800712 
N780Q713 

N7800714 O 

N780Q715 , 

N7800716 

; O 

N78Q0718 Q 

O 

O 

o 

o 

: O 
O 

o 
■ o 
o 

; O 

o 


o 


COIST 
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O 

072D 



0721 


o : 

0722 

0723 


07P3 

0360 


0 723 

0360 P 

O 

0723 

0 0 09 


o 

0725 

0725 


0016 



0725 


0360 

P 

o 

0725 

P0360 

0000 


0725 

P0 361 

53 45 




P0362 

4C45 




PQ363 

4354 


o 


P0 364 

2D4F 



P0365 

5054 




P0366 

494F 




P0367 

4E0Q 


o 

0725 

0726 


0 0 07 



0726 


0 0 IE 



0726 


03 68 

P 

o : 

0726 

P0368 

0000 


0726 

P0369 

2020 



0726 


0001 


o 

0727 

0728 
072 8 


0020 



0728 


03 6 A 

P 


072 8 

P036A 

0 0 02 


o : 

072 8 

PQ36B 

2020 



P036C.. 

4120 




P036O 

2020 




P036E 

2020 


o 


P036F 

5120 



P0 370 

2 0 20 




P0371 

2020 




P0372 

4920 


O : 


PO 373 

20 52 



P0374 

4547 




P0375 

4953 




P0376 

5445 


O 


P0377 

520D 


072 8 


Q02E 



072 8 

P0378 

4141 




P0379 

4141 


o 


P037A 

2020 



P037B 

5151 




P037C 

5151 



o 

’ o 


OPTION SELECTION JTESSAGES PART X 
STRMSG OPMX 


MESSAG OPHX,OPMi,0,*SEL£CT OPTION:R%0 


HESS AG OPHX,OPA1,0,» %0 


MESSAG 0PHX,0PM2,2i* ^ A Q I REG ISTERS R • » 1 , 

HESSAG »AAAA QQOQ IIII’SO 




N7800 720 
N7800721 
N780G722 
N7800723 


N7800725 


N7800 726 


N7800727 

N78D0728 


□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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o 

o 

o 

o 

o 


PQ37D 2020 
P037E 4949 
P037F 4949 
07?8 0015 

0729 

0729 C036 

0729 0380 P 

0729 P0380 0000 
0729 P0381 4649 
P0382 4E49 
P038 3 53 48 
P0384 2053 
P0385 5953 
P0386 434F 
P0387 5020 

0729 0007 

0730 P0388 0038 


o 


o 

o 

o 

o 

o 


o 

o 

o 


o 


HESSAG 0PMXt0PM3,Q , 'FINISH SYSCOPNO 


BZS OPMXFLISEGSIZ--+OPMX} 


o 


M7800729 


} I 

o 
o 
o 
o 

N78QQ73G ^ 

O 

O 

O 

O 

O 

O 

O 

o 

o 

o 

o 


o 




COIST 

o 

0732 



0733 



0 73 4 


o 

0 73 5 
0735 

0 3C.O 


0735 

Q3CD P 


0735 

OOOA 


o 
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LOCORE MESSAGES PART X 
STRHSG LCMX 


DATES 08/19/99 


O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


0737 

0737 0016 

0737 Q3C0 P 


0737 

POSCO 

0 0 01 

0737 

PQ3C1 

2A2A 


P03C2 

2A4C 


P03C3 

4F43 


P03C4 

4F52 


P03C5 

4520 


P03C6 

434F 


P03C7 

4E53 


PQ3C8 

5441 


PQ3C9 

4E54 


P03CA 

2 0 45 


P03CB 

5252 


P03CC 

4F52 

0737 


OOOC 

0738 

0738 


0016 

073 8 

POSCO 

20 49 


PD3CE 

4E49 


P03CF 

5449 


PQ3DQ 

41 4C 


P0 3D1 

4C59 

0738 


0011 

0739 

0739 


0 0 28 

0739 


S3D2 P 

0739 

PD3D2 

00 01 

0739 

P03D3 

4249 


P03D4 

5420 


P03D5 

5441 


P03D6 

424C 


P03D7 

4520 


P03D8 

4348 


P03D9 

4543 


P03OA 

4B53 


P03DB 

5540 


P03DC 

2045 


P03DO 

52 52 


P03DE 

4F52 


MESSAG LCHX,LCM2,1,*»'»^LOCOR£ CONSTANT ERROR*, 0 


ADDHES LCM2,LGM1,* INITIALLY* 


MESSAG LCHX,LGM3,1 ,»BIT TABLE CHECKSUM ERROR*, 0 



N7800732 

N7800733 

N7800734 

N7800735 


N7800737 


N780 0738 


N780 0739 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATES 08/19/99 



MESSAG LCMX, LCMAtl ,• ADDRESS IN Sl^MZ WAS *,1» 
MESSAG *1234 BUT SHOULD EE »,1,*1234' 


MESSAG LGHX,LGH6^1,*MAX CORE WAS ',1,*1234 WITH %1, 
MESSAG *1234 TO %1, *1254 UNPROT* 


N78Q0740 

N7800741 


□ 
o 
o 
o 
o 
o 
o 
o 

N78Q0742 O 

N7800 743 

o 

o 

o 

o 

o 

o 

o 
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o 

0743 

P0406 

4F20 
0 0 6D 



o 


0743 

P0407 

3132 




o 


P0408 

3334 



o 


PD409 

2055 





P040A 

4E50 






P040B 

524F 




o 

0743 

P04GC 

5420 

0016 



o 


0744 
07 4 4 


0 0 4C 

ADDME3 LGM6tLCM5f" (ERROR?' 

N780D744 


o 

0744 

P0400 

2 0 28 



o 


P04BE 

4552 





P040F 

524F 






PQ410 

5229 




o 

0744 

0745 


OOIA 

MESSAG LCtiX, LCM8,lt*MAXSEC WAS SI, » 12345678» , 0 

N7800 745 

o 


0 74 5' 


0 0 67 




0745 


0411 P 




o 

0745 

P0411 

•0 0 01 



o 

0745 

P0412 

4D41 





P0 413 

5853 






P0414 

4543 




o 


PD415 

2 0 57 



o 


P0416 

4153 





PQ417 

2020 





0745 


0 0 6E 




o 

0745 

P0418 

3132 



o 


P0419 

3334 





P041A 

3 5 36 






P041B 

3 738 




o 

0745 


OOOA 



: ^ 

0746 

0746. 


0067 

ADBMES LCM8,LCH7, * (ERROR?* 

N78D0746 




0746- 

PQ41C 

2 0 20 




o 


P041B^ 

4 552 



o 


P0 41F 

524F 





P041F 

5229 





0746 


OOOE 




o 

0747 

P0420 

0000 

BZS LCHXFL JSEGSIZ-».4LCHXI 

N7600 747 

o 

o 






o 

o 






o 


o 

o 

o 

o 


o 


o 


GOIST 
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DATES 08/19/99 


0749 • 

If 

Q75 0- 


0751 


0752 

0752 

0420 - 

0752 

0420 P 

0752 

0 0 OB 


PRIORITY LEVEL HES'SAGES-PART X 
STRHSG PL MX 


N78Q0749 

N780075D 

N78Q0751 

N7800752 


0754 

0754 


0 016 

0754 


0420 

0754 

P0420 

0 0 01 

0754 

P0421 

2A2A 


P0422 

2A50 


P0423 

4F53 


P0424 

5349 


P0425 

42 4C 


P0426 

4520 


P0427 

4C45 


P0428 

5645 


P0429 

4G20 


P042A 

4841 


P0 428 

4E47 


P042C 

5550 

0754 


OQOC 

0755 

075 5 


0 023 
042D 

0755 


0755 

PG420 

0 001 

0755 

P0 42E 

5 0 52 


P042F 

49 2.0 


P043Q 

4C 56 


P0431 

4C20 


P0432 

5741 


P0433 

5320 

0 75 5 


0 0 2 A 

0 75 5 

P0 434 

3132 


P0435 

3334 

0755 


■3 0 08 

0 75 6 

0756 


0023 

0756 

P0436 

2 0 28 


P0437 

4552 


P3438 

5 24F 


P0 439 

5229 

075E 


0 0 oc 

0757 

PG43A 

0 0 46 


MESSAG PLMX-,PLMl-,i, ^»»^^POSSiaLE LEVEL HANGUP", 0 


MESSAG PLMX,PLM3, 1, 'PRI LVl WAS ',1,'1234*,G 


AODHES PLM3,PLM2,» lERROR) • 


BZS PLHXFL{SEGSIZ'-'»+PLMXI 


N780D754 


N7800755 


N78QB756 


N78QQ 757 


COiST 
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DATES 08/19/99 


o 


I 


0759 


0760 


0761 

0752 

■■9- 

0762 

0480 

0762 

0 480 P 

0762 

OOOC 


o 


O 

0764 

0764 


0016 


0764 


0 4-80 

O 

0764 

P9 48Q 

0000 

0764 

P0 481 

4455 



P0 482 

4050 



PG483 

200D 

r\ ■ 

0764 


0003 

O 

0 76 5 
0766 
0 767 
0 767 


•OOIA 

0767 


0 4 84 


0767 

P0484 

00 00 


0767 

P0485 

3132 

O 


PQ486 

3334 


PD487 

2020 



P0488 

30 32 



P0489 

3334 

o 


PQ48A 

2020 


P048B 

3132 



P048G 

3334 



P048D 

2020 

o 


P048E 

3232 


P048F 

3334 



P0490 

2020 



P0491 

3332 

o 


PO 492 

3334 


P0493 

2020 



PO 494 

3 432 



P0495 

33 34 

o 


P0496 

2020 


P0497 

3532 



P0498 

3334 


0767 


0 0 2F 

o 

0767 

P0499 

2020 

P049A 

3632 



P0498 

3334 



P0 49C 

2020 

o 


P0490 

3732 


P049E 

3334 


o 

o 


OUMPCORE MESSAGES PARTX 
STRMSG DPMX 


N7800759 
N7800760 
N7800 761 
N780 D762 


MESSAG DPMX, DPMI, 0,* DUMP :R»,0 


M78Q0764 


MESSAG OPMX, OPM2,0, '1234 
MESSAG • 6234 7234',!,' 

MESSAG *C234 D234 E23h 


023i^ 1234 2234 3234 4234 5234',!, N780 Q765 

JR1234 8234 9234 A234 8234 ',!» N780D766 

F234 •' N78Q0767 



o 

□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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OATES 08/19/99 



M.ESSAG 3PMX, DPM3,0, "FINISH SYSCOP",0 


M'ESSAG OPNXf DPAl, 0 


o 


o 

o 

o 

o 

o 

o 

o 

o 

N7800768 Q 

o 

o 

»,0 N7800769 Q 

o 

o 

o 


o 



o 


o 


o 


o 


N780Q77D O 

N78Q0771 

N780C772 

N7800773 

N78Q0774 U 


O 


O 


■ O 

N78Q0775 
N78G0 776 


O 


O 

N7800779 

N780078Q ^ 

N78QQ781 ’ U 

N78Q078Z 

O 


O 




O 


o 


c 
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DATEJ 


08 / 19/99 


rj 


o 

E Q U I V 

A L E N 

C E S 







DEE. LINE 

NAME 

VALUE 


REFERENCED AT 

LINE 

NUMBER 


o : 

0 000 

I 

OOFF 

(000255) 

0142: 






0 077 

SEGSIZ 

0060 

(C00096) 

0095* 

0095, 

0095, 

0095, 

0095 , 





0163, 

0163, 

0163, 

0195, 

020 0 , 

O : 





0289, 

0289, 

0289, 

0289, 

0289, 





0336, 

0410, 

0415, 

0415, 

0 415, 






0 474, 

0474, 

0474, 

0474, 

' Q ^ T ^ 






Q'629 , 

0 629, 

0 629, 

0629, 

0629 , 

“w' 





0752, 

0 752, 

0 757, 

0762, 

0 762, 

0080 

SEGCOR 

0016 

(000022) 

0 725, 

0 726, 

0723, 

■ 0728, 

0 729, 






0745, 

0754, 

0755, 

0755, 

0764, 


0 081 

LDA 

0 001 

1 0 001301) 

0136, 

0143, 

0173, 

022 2, 

0 24 4, 


0 081 

CON 

00 0 3 

(OGOfl-03) 

0258 





■j 

0 081 

LST 

000 5 

(000005) 

0114, 

0150, 

0191, 

0 261, 

0 40 6 , 


0 081 

■ WRf 

0007 

1000007) 

0106, 

0 516 




0081 ■ 

ANS 

0009 

(QOOQ09) 

0108, 

0518, 


, 


o 

0081 

■ ATA 

OOOB 

(000011) 

0167, 

0204, 

0 293> 

■0351, 

0353, 

0081 . 

CNS 

QOQ D 

IOOOQ13) 

0148, 

0 260, 

0391, 

0 392, 

0 433 , 


0 081 

GMS 

OOOF . 

COQOQ15) 

0105, 

D14 6, 

0188, 

0254, 

0 38 6, 


0 0 8? 

HOP 

0011 

(000017) 

0190, 

0256, 

3396, 

0440 


O ; 

0083 

CMP 

0013 

(0000193 

: 0317, 

0 380, 

0562 



0095 

0PM 

0000 

(QOOOOO) 

0104, 

0129, 

0145, 

. 0152, 

0 534 


0163 

VLCN 

0001 

( 000001) 

0152, 

0187, 

0192, 

0458 



0200 ^ 

WLCN 

0002 

I00QO02) 

0192, 

0 239, 

0253 



O ; 

0289 

XLCN . 

00 0 3 

(000003) 

0239, 

0 32 7 




0336 

KLIM ■ 

000 4- 

( 00.0004) 

0327, 

'0365, 

0407 




0 415 

YiCN ■ 

00 0 5 . 

( 00300 51 

84Q7, 

0 431, 

0 458 ,. 

0463 



0474 

PLN 

0 00b- 

(.00 00.06) 

S463 , 

Q479, 

3502 



o : 

0511 

8 PM 

0007,, , 

(000907) 

0129, 

0514, 

0534, 

S571, 

0712 

0 629 - 

WDPN 

' 0008 

IQ00QQ83 

0571 , 

0 675, 

0712 




0 723 • . 

SOPMX 

. 036G 

{0 00 864) 







B'723. ■ 

OPHXN 

00B9 

(000009) 

0104, 

014 5 




o 

0725 

OPHl ■ 

0016 

1008022) 

0106 





0725 

LOPMl 

0007 • 

CQ00007) 

0106 






0 72 6 ■ 

OPAl 

. 001€ 

1 000030) 

0108, 

0110, 

3117 




0726 

LOPAl 

• 0001 

(000601) 

0108 





o 

0 72 8 

0PM2 

0020 

(000032) 

0150 





0 72 8 

OPMZVl 

Q02E 

(000046) 

0148 






0728 

LCPM2 

QOl 5 

(Q00Q21) 

0150 





o 










o 











0 09 5, 

0095, 

0095, 

0095, 

0158, 

0163, 

0163, 

0163, 

0163, 

0163, 

0163 

0 20-0, 

C200, 

G2Q0, 

0200 , 

0200, 

0200 , 

0200, 

0200, 

0284, 

0289, 

0289 

0289, 

0289, 

0331, 

0 336, 

0336, 

0335, 

0336, 

0336, 

0336, 

0336, 

0336 

0 41 5, 

0415, 

0 415, 

0415, 

0415 , 

0415, 

0469, 

0474, 

0474, 

0474, 

0 474 

0506, 

0511, 

0511, 

0511, 

0511, 

0511, 

0511, 

0 511, 

0 511, 

0511, 

0 624 

0 629, 

0629, 

0 62 9, 

0629, 

0718, 

0723, 

0723, 

0730, 

0 735, 

0735, 

0 747 

0775, 

0781, 

0781 









0 73 7, 

0739, 

0741, 

0741, 

0741, 

0741, 

0743, 

0743, 

0 743, 

0743, 

0 745 

0767, 

0767, 

0767, 

0767, 

0768, 

0769, 

0774 





0301, 

0305, 

0 306, 

0425, 

0429, 

0477, 

0645 





0 449, 

0487, 

0499, 

0530, 

0 683 , 

0 70 5 






0363, 

0419 










0481, 

0 6 87 










0 432, 

.0480, 

0515, 

0676 









G 

□ 

o 

o 

o 

o 

n 


o 


o 

o 

o 

o 

o 

o 

o 


o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


COIST 


0 729 

OP M3 

0036 

0 729 

LOP M3 

00 07 

0 73 5 

SLCMX 

0 3G0 

0 735 

LCMXN 

OOOA 

0737 

LCM2 

0016 

0737 

LLCM2 ■ 

OOOC 

0738 

LCMl 

0016 

0738 

• LLCMl 

flOll 

0 739 

LCM3 

DC28 

Q 739 

LLCM3 

OOOC 

0741 

LCM4 

003 5 

0 741 

LCM4V1 

003C 

0741 

LCM4V2 

0040 

0 741 

LGM4\/3 

004A 

0741 

LLCM4 

0016 

0743 

■LCM6 

0Q4C 

0 743 

LCM6V1 

. 0054 

0 743 

LCM6V2 

0059 

0 743 

LCM61/3 

005D 

0 743 

LLCM6 

0016 

0 744 

LCM5 

004C 

0744 

LLGM5 

OOIA 

0 745 

LCM8 

0067 

0 745 

LCM8\71 

0 0 6E 

0745 

LLCM8 

OOOA 

0 746 

LCH7 

0067 

0 746 

LLCM7 

BODE 

0 752 

SPLMX 

0420 

0752 

PLMXN 

OODB 

0 754 

PLMl 

0016 

0 754 

LPLMl 

OOOC 

0755 

PLM3 

0 023 

0755 

PLM3V1 

002A 

0755 

LPLM3 

00 08 

0 756 

PLM2 

0023 

0 756 

LPLM2 

ooac 

0762 

SDPMX 

0480 

0 762 

DPHXH 

OOOC 

0 764 

OPMl 

0016 

0 764 

, LOPMl 

0 003 

0767 

0PM2 

OOIA 

0767 

DPM2V1 

002F 

0 767 

0PM2I/2 

003 5 

0767 

0PM2V3 

0045 

0767 

LDPM2 

0036 

0768 

0PM3 

0051 

Q768 

LDPM3 

0007 

Q 769 

QPAl 

0059 

0769 

LDPAl 

OOQE 

0 774 

DPM4 

0069 

0 774 

LDPM4 

0009 

0781 

NEXTN 

GOOD 


■ PAGE 

38 


IQ00054) 

0114 


( 000007J 
[ 0009605 

0114 


1 0000105 

0 187, 

0253, 

(0000225 

0738 

0255, 

(000012) 

(0000225 

0189, 

( 000017) 

0 456 


(0 00 040 5 

0 191 


(0000125 

0 191 


(0000535 

0 261 


(0000605 

0 259 


( QC00&45 
(0000745 

0260 


( 0000225 

0261 


(Q00Q765 

0 402, 

0 405, 

( ODOD845 

0391 


( 0000895 
(0000935 

0392 


(0000225 

0406 


(0000765 



(0 000265 

0 397 


( 0001035 

0445, 

0448, 

(000110) 

0 433 


(0000105 

(0001035 

0 449 


(0000145 

(0010565 

0441 


(0000115 

0 479 


(Q00022) 

0 487 


10000125 

0 487 


(0000355 

0498, 

0^99, 

( 0000425 

0 481 


(0,000085 

(0000355 

0 499 


1 0000125 

<0011525 

0 493 

0675 

(OGOD12) 

J514, 

(0800221 

8 516 


(0000035 

0516 


(0000265 
( 0000475 

0687, 

0 70A 

(000053) 
(0000695 
( 0000545 

0698, 

C699, 

(0000815 

0530 


« 0CQQ075 

0 53 0 


(0000895 

0518, 

0 520-, 

10000145 

0 518 -, 

0 574 

(0001055 

(0090095 

0682 


( 0000135 

0502 



date: 08/19/99 

0385, 0A31 
0395, 0439, 0456 

0406, 0744 
0 449, 0 746 

0756 

0700 

0576, 0585 



o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


c..) 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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date: 08/19/99 


; y M B 0 

L S 


OEF .LINE 

NAME 

ADDRE 

0 07 5 

SYSSEG 

000 0 

0095 

OP 

flOQO 

0 095 

OPOP 

0060 

0 095 

OPIFG 

0061 

0 095 

OPMFG 

0 0 62 

0095 

OPCl 

0063 

0 095 

0PC2 

0064 

0 095 

0PC3 

0065 

009 5 

0PC4 

0066 

0106 

OPl 

000 9 

0 117 

OPll 

0017 

0122 

0P2 

OOlC 

0125 

0P3 

OOIF 

0133 

0P4 

0024 

0134 

DP41 

0025 

0 142 

0P5 

0020 

0155 

OPCOB 

003D 

0 156 

OPTMP 

0G3E 

0158 

0163 

OPFIL 

0041 

VLC 

0060 

0163 

VLCOP 

OOCD 

0163 

VLCTFG 

OOCl 

0163 

VLCMFG 

, 00C2 

0 163 

VLCCl 

00D7 

0163 

i/LCC2 

00C4 

0163 

\?LCC3 

00C5 

0163 

VLCC4 

00C6 

0171 

LCl 

00 66 

0 172 

LCll 

0067 

0173 

LCl 2 

0068 

0 18 0 

LCDS 

006F 

0181 

LCGCS 

0070 

0183 

LC2 

0071 

0 192 

LCX 

007A 

0195 

\?LCFIL 

COJC 

0 20 0 

WLC 

OOCO 

0 20 0 

WLCOP 

■ 0120 

G 20 0 

WLCIFG 

8121 

0 20 0 

WLCMFG 

0122 

0 200 

WLCCl 

0123 


REFERENCED AT LINE NUMBER 


0 095, 

016 3, 

0200 , 

0289, 

0762, 

0781 


0095, 

0095, 

0126 

0095, 

0095, 


0 0 99 . 
OIDO 
0101 
0102 
0103 





0095, 0095, 0095, 0095, 0130, 0148, 0153, 0158 


0121, 
0 112 

0124 


0120 

0123 

0127 

0141 

0139 

0135 

0137, 

0144, 

0148 

0163, 

0163, 

0163 

0165 



0 166 
0179 



0168 

0174,. 

0183 

0177 


0176 

0184 



3 200, 

0 200, 

0 20 0 


0195 


0202 


C) 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


COIST 


PAGE AO 


DATE 



] t 

0200 

WLCC2 

0124 






0 200 

WLCC3 

0125 






0 200 

WLCC4 

0126 





o : 

0 21Q 

LC3 

G0C7 

■ 0203, 

0242 



0214 

LC313S 

QOCB 

"0 212 





0 220 

LC31W 

OODl 

0230 





0222 

LG31X 

0 0 04 

0 2Q5 




o 

0228 

LC3Z 

CODA 

. 0,226 




0229 

GKTS 

OODB 

0 218 





0 231 

LC313 

GOOD 

3 213 





0237 

LC32 

00E3 

0228, 

0 25 0 



o 

0 241 

LC32XX 

QQE7 

0238 




0 243 

LC31 

O0E9 

0 232 





0 244 

LC311 

OOEA 

0 206 





0 249 

LC312 

OOEF 

0 262 




o 

a 253 

LG33 

OOFl 

3 2 27, 

0248 



0 263 

LGCTR 

0101 

0210, 

0215, 

0233, 

0234, 


0 264 

LCAOn 

010 2 

0221 , 

8236, 

0 243, 

0249, 


0265 

LCISAD 

0103 

0224, 

0246, 

0260, 

0 26 6 

o 

0 266 

LCVAOO 

0104 

0223, 

0245 



0268 

LCATB 

010 5 

Q 211, 

0235 




0 281 

MS0SF8 

eiifi 

0 219 

0 22 9 




0282 

rsFs 

one 

0216, 



o 

0284 

LCFIL 

illlD 



0289, 

0289, 

0289 

XLC 

0 12 0 

0289, 

0289, 


0 289 

XLCOP 

0 180 






0 289 

XLCIFG 

0181 

0 291 




o 

0 289 

XLCMFG 

■016 2 

0322 




0 289 

XLCCl 

0183 





0289 

X1CC2 

0184 

3 2 98, 

3 310, 

0 32 4 



0289 

XLCC3 

018 5 

0.309, 

0 32 8 



o 

0 289 

XLCC4 

018 6 

0326 




0 29 7 

tC4 

0126 

0292 





G 298 

LC43 

. 012? 

0 113 





Q 301 

LC4 2 

012R 

0294 




© 

Q 310 

LC44 

0135 

0307 , 

G3C8 



0315 

LC5 

0139 

0312 

0 319 




0 321 

LC51 

C13F 

0 318, 




0 329 

LC4TP 

01-4 7 

0 302, 

0 315, 

Q316, 

0 321, 

o , 

e 331 

XLCFIL 

0l4A 




0336, 

0 336 

XL! 

018 0 

0336, 

0336, 

0335, 


0 336 

XLIOP 

OlEO 






0336 

XLl IFG 

QlEl 

0 344 




o 

0336 

XLIHFG 

a IE 2 

0 403 



0367, 

0336 

XLICI 

01'E3 

0 338, 

0.360, 

0366, 


0 336 

XL1C2 

0 1 E 4 

0340 

0393 




0 336 

XL1C3 

OlE 5 

0 384, 


3 371 

o ' 

0 336 

XL1C4 

oiee 

0342, 

0358, 

0368, 

0350 

LC5113 

018A 

Q 345 





0 357 

LC5114 

0192 

' 0 354 





0 362 

165115 

6198 

0 373 




o 

0368 

NXTACL 

019E 

0364 




0374 

LC5117 

Q1A4 

3370 





i O 


i O 

] 


08/19/99 


0 2.3 7-, 0 2A1 
0 25 7 

0289, 0289, 0239, 0239, 0328, 0 331 
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O 

o 
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0063 

EIF 
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0064 

EIF 

EM . 
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o 
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EQU 
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o 
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EMC 
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o 

0069 
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o 
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EQU 
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o 
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M7900080 
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o 
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P 
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0 060 
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N79D0 096 
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P 
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0098 
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P 
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0 0 63 
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00 65 

P 
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P 
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o 

o 

o 

o 

o 
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POOOl 

C860 

LOA» 

ITIFG 
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ClGl 

POO 02 

01D5 
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0102 

PC003 

POOOA 

COCO 

510B 

LDA 
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P0Q05 
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IT21 


0105 
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6839 
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IT22 
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N7900102 
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O 

O 

O 
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0C3C 
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COOO 
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= NT10G 
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0111 

PO OOB 
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A 

0112 

PO ODD 
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3 
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POGOD 

5101 

ITlC-2 

RTJ- 

LDA, I 

OllA 

POOQE 

DF22 


QRS 

2 
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POOOF 

6A3E 


STA» 

IT1TP,Q 
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POOlO 

ODF'E 
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-1 
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POOH 
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SQM 
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QFA2 
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2 

0119 
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18F5 


JMP» 

ITIOI 

0120 
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0121 

POOIA 
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ITll 

ENQ 

0 
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STQ» 

ITILN 

0124 

PDQ16 

CA37 
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P0017 

BOH 


EOP- 
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PO 018 

0105 


SAZ 

IT13 
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N7900111 

N7900112 

N7900113 
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N790011 6 

N7900117 
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ITHXN-ITN 
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61 5A 
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O 
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SAM IT351 

O 
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QDOl 
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IT351 
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P0094 

0 AOF 
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o 
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o 

0243 

P0099 
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IT39 
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P009A 
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•N7900244 
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N7900249 
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□ 
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o 
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o 

o 

o 

o 

o 
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o 
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0284 

POODB 

63 40 


STA- 

ITM7V2, B 


M790 0284 

0285 

POODC 

ODFE 


INQ 

-1 


N7900285 

028 6 

POODD 

0173 


SQM 

IT44 

DONE 

N79Q028fo 

0287 

POODE 

48 02 


STQ-^ 

IT4CTR 


N7900267 

0288 

POODF 

18F6 


JMP» 

IT43 


N79G0288 

0289 

POOEO 

OOOF 

IT4CTR 

NUM 

15 


N790D269 

0290 

POOEl 

C841 

IT44 

LDA» 

XITMFG 


N7900290 

0291 

P00E2 

Dill 


SAN 

IT45 


N7900291 

0292 

P00E3 

D128 


RAO- 

ITM7, I 

NOT RELATED 

N7900292 

0293 



IT45 

LISTIT ITH7 


N7900293 

0293 

P00E4 

0A27 






0293 

P00E5 

0C28 






0293 

P0 0E6 

5105 







0295 

P00E7 

CQGO 

X 

ITS 

LOA 

=XFMASK 

SFT UP FOR CHECK OF FORTRAN 

LEVELS 

N7900295 


P00E8 

7FFF 

X 








0296 

P0 0E9 

BOll 



FOR- 

$11 




N79C0296 

0297 

POOEA 

0114 



SAN 

IT52 




N79flC297 

0298 

P00E8 

0C02 



ENQ 

ISN-XITN 

SKIP PART-Y IF 

NO FTN LEVELS 

♦4.0»79-»1932 

N7900298 

0299 

•PODEC 

1 CDS 



JMP» 

(XIT) 



_ »4. G’^795-1932 

N790Q299 

0300 

PDOED 

OCDl 


IT51 

ENQ 

VITN-XITN 




N7900300 

030 1 

POOEE 

ICDl 



JMP^ 

IXIT? 




N790D3G1 

030 2 

POOEF 

C8F8 


IT52 

LDA» 

IT5>H 




N79B0302 

G3C3 

POOEO 

5101 


IT521 

RTJ- 

LOA ,I 

GET FMASK 



M79D03D3 

0304 

PCCFl 

6832 



STA» 

xirci 

SAVE IT 



N7900304 

038 5 

P0DF2 

0111 



SAN 

IT523 




N790!J3a5 

0306 

PD0F3 

18F9 




IT51 




N7900306 

0307 

PO 0F4 

B8 44 


IT523 

CLR 

A 




N79Q D307 

0308 

P0DF5 

68 2F 



STA» 

XITC2 




N790 0308 

0309 

P00F6 

E8 OE 



LDQ-*- 

ITSGTR 




N79G0 309 

0310 

POOF7 

E A OF 


IT524 

LDQ^ 

IT4fP,Q 

LEV EL 



N790 0310 

0311 

POOFS 

QAOF 



ENA 

$F 




N7900311 

0 312 

P00F9 

0 8B2 



L A Q 

Q 




N790 a 312 

0313 

POOFA 

C82A 



LDA*^ 

XITC2 




M79G0313 

031 4 

POOFB 

A233 



AND- 

$35 




N79G0314 

031 5 

POOFC 

8223 



EOR- 

$ 23 t Q 

SET BIT IN A 



N79G0 315 

0316 

POOFD 

682? 



STA*^ 

xirc 2 

SAVE INTERRUPT 

LEVELS 


N7900316 

0317 

POSFE 

£8 06 



LDQ^ 

IT5CTR 




N7900317 

031 8 

POOFF 

GOFF 



ING. 

-1 




N7900318 

0319 

PDICO 

8172 



SQM 

IT54 




M7900319 

0320 

POICI 

4803 



STQ^ 

IT5CTR 

SAVE Q 



N790fl320 

0321 

PD1C2 

18F4 



JMP*^ 

IT524 




N79Q0 321 

0322 

P0103 

18E9 


IT5 4 

JMP* 

IT51 
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0323 










N7900323 

0324 

P0104 

QOOF 
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N7900324 
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0330 

V- 

INTERRUPT TRAP PART 

0331 

0332 


STRTSG Ylf 

0332 

0120 P 


G332 

0 0 03 


0332 

0180 P 


0332 

0181 P 


0 33 2 
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0332 

0183 P 


0332 

0184 P 


0332 

0185 P 


0332 

0186 P 


0332 

PD120 0000 
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N790 0329 

Y N790Q33D 

N7900331 

N7900332 


0334 

0335 

0336 

0337 P0121 C862 
0333 P0122 OllE 


^ YITCl HAS 

^ YITC2 HAS 

YITC3 HAS 
LDA» YITCl 
SAN 1155 


FMASK 

INT^ LEVELS 
INVALID INT. LINES 
GET FHASK 


N7 90 0 33 4 
N7900 335 
N7900336 
N790Q337 
N7900338 


0340 




¥ 

0341 

PC123 

0 8 4L 

ITS 

CLR 

0342 

P0124 

6a5£ 


STA* 

0343 

P0125 

C85C 


LDA» 

0344 

P0126 

0114 


SAN 

0345 

P0127 

0 A05 


ENA 

0346 

P0128 

6859 


STA'^ 

0347 

P0129 

OCFC 


ENQ 

0348 

PC12A 

1CF5 


JM'P» 

0349 





0350 

P012B 

0 8 44 

IT81 

CLR 

0351 





0352 





0353 

PD12C 

6655 



0354 

P0120 

6856 


STA^» 

035 5 

P012E 

6856 


STA^ 

0356 

P012F 

OCOl 


ENO 

0357 

P0130 

ICEF 


JMP^ 


% % 

CHECK 

IF DONE WITH IT 

Ylf HFG 
YITIFG 

CLEAR 

DATA 

IT81 

LlTHl-LIfM2 

DONE 


YITIFG 

ITN-YlfN 



illJ} 

EXIT 



A 

CLEAR 


USED STORAGE AREA 


tSAVE INVALID LINESI 


YITIFG 
YITCl 
YITC2 
ISN-YITN 
I YI T I 


GO ON TO INT STACK 
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N7900346 
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N7900350 
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N7900354 
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o 
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P0131 
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IT55 
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ITHYN-TITN 
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P0132 

510F 


RTJ- 

GMS,I 


0362 

PGloo 

C85D 


LDA'» 

YITCl 

o 

0363 

P0134 

A850 


AND* 

YITC2 

036L 

P0135 

AOOO 


AND 

=N$7FF8 



P0136 

7FF8 




0365 

P0137 

0822 


TRA 

Q 

o 

0366 

P0138 

0F61 

IT552 

LRS 

1 

0367 

P0139 

0134 


SAM 

IT56 


0368 

P013A 

0142 

IT551 

SQZ 

IT59 


0369 

P013B 

D8 0E 


RAO^ 

IT55CT 

o 

0370 

P013C 

18FB 


JMP» 

IT552 

0371 

P013D 

18 OE 

IT59 

JMP» 

IT6 


037 2 

P013E 

48 QC 

IT56 , 

STQ^ 

IT5QSV 


0373 

P013F 

C80A 


LDA^ 

IT55CT 

o 

037 L 

PD140 

5103 


RTJ- 

CON, I 

0375 

P01i4 

41 54 


STQ- 

rfMSVl, I 


0376 

P0142 

OAOC 


ENA 

LITHE 


0377 

P0143 

5111 


RTJ- 

MOP, I 

o 

0378 




LISTIT ITM8 

037 8 

P0144 

OAIE 





0378 

P0145 

0C50 





037 8 

PD1L6 

5105 




o 

037 9 

P0147 

E8 03 


LDQ^ 

IT5QSV 

038 0 
0381 

P0148 

18F1 


JMP» 

IT551 



0382 

P0149 

0 0 0 0 

IT55CT 

NUM 

0 

o 

0 38 3 
038L 

P014A 

0000 

IT5QSV 

NUM 

0 

o 

0386 






o 

033 7 

PQ14B 

OA OD 

IT6 

ENA 

ITMZN-YITN 

0388 

P014C 

510F 


RTJ- 

GMS,I 


0389 

P014D 

C836 

IT61 

' LDA'^ 

Tirci 


039G 

PG14E 

E8 2C 


LOQ» 

IT6CTR 

o 

D391 

P014F 

E2 23 


LDQ- 

$23,Q 

0392 

PQ15Q 

08B2 


LAQ 

Q 


0393 

P0151 

0155 


SQN 

IT63 


039L 

P0152 

0828 

IT62 

RAO* 

IT&CTR 

o 

C395 

P0153 

E827 


LDQ* 

irOCTR 

0396 

PG15 4 

ODEF 


INQ, 

-16 


0397 

PD155 

0167 


SQP 

IT65 

o 

0398 

0399 

P0156 

18F6 

» 

JMP* 

IT61 

0400 

P0157 

£823 

IT63 

LOQ* 

IT6Cf R 


040 1 

P0158 

C3L5 


LDA- 

ITM9TB, 3 


0 40 2 

P0159 

E822 


LOQ* 

IT6CT1 

o 

0 40 3 

P015A 

6331 


STA- 

ITM AVI , B 

040 4 

P015E 

0820 


RAO* 

IT6CT1 


O 


DATEt Q8/19/99 


LEVEL F AND 0-2 LATER-ILLEGAL FORTRAN LEVEL 
ERROR (S) 

AN ERROR ISOLATED 
ALL DONE 

SAVE Q 
GET LEVEL 


^FORTRAN LEVELS^ ^ » » 

GET HESSAGE BLOCK 


FORTRAN LEVEL 
DONE 

GET LEVEL 
SAVE 



C.) 

N790 0 360 

o 

N7900361 


N7900362 


N79Q0363 

o 

N790G364 

N7900365 


N790 0 366 

o 

N7900367 

N7900368 


N7900369 


N7900370 

o 

N7900371 

N790Q372 


N7900373 


N79Q0374 

o 

N7900375 

N79D0376 


N790C377 


N79Q0376 

. o 

N79Q0379 

o 

N79Q0380 

N7900381 


N7900382 


N7900383 

o 

N790D384 


o 

* N7900386 


N79D0387 

^ o 

N7900388 

N7900389 


N79G039C 


N7900 391 

o 

N790O392 

N7900 393 


N7900394 


N79D0395 

o 

N79G0396 

N7900397 


N79D0398 


N7900399 

o 

N79D04D0 

N79QQ 401 


N7900 402 


N79Q 0 4D3 

: O 

N7900404 


■ O 


O 


o 


o 


C02N0 
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DATES 08/19/99 


L..' 

o 

o 

o 

o 

o 


O^05 P015C 18F5 
040 6 

0407 P015D C826 
0A08 P015E 0133 

0409 P015F 0842 

0410 P0160 OFFO 

0411 P0161 0104 

0412 P0162 OAOC 

0413 PD163 5111 

0414 P0164 OAl'C 

0415 PC165 1606 

0416 P0166 0128 

0417 P0167 C81B 

0418 P0168 0111 

0419 P0169 0128 

0420 

0420 P016A 0A18 
0420 P016B 0C28 
0420 P016C 5105 


IT65 

IT66 

1167 

IT68 


JMP» IT62 

LOA=^ YITCl 
SAM IT66 
CLR a 
LLS 13 
SAZ IT67 
ENA LITM2 
PTJ- MOP, I 
ENA LITM9 
JMP» IF68S-1 
RAO- ITMA,I 
LDA'^ YirMFG 
SAN IT68 
RAO- ITMA,I 
LISTIT ITMA 


NO ERROR 
ERROR MESSAGE 

SUPPORT 
NOT RELATED 


o 

o 

o 

o 

o 


0422 

0423 P016D C80E 

0424 PQ16E D9FE 

0425 P016F 0139 

0426 P0170 COOO X 
P0171 7FFF X 

0427 P0172 soil 

0428 P0173 0105 

0429 P0174 OAOC 

0430 PC175 5111 

0431 

0‘+31 P0176 0 A17 
0431 P0177 DC55 

0431 P017R 5105 

0432 P0179 18A9 

0433 

0434 P017A 0000 

0435 PG17B 0000 


^ V- 

LDA» irscfi 
INA -1 
SAN IT7 
LDA =XNDISP 

EOR- $11 
SAZ IT7 
ENA LITH2 
RTJ- MOP, I 
LISTIT ITHB 


IT7 JMP» TT8 

IT6CTR NUM 0 
IT6CT1 NUM 0 


^NDISP CHECK 
NO CHECK 

OK 




o 


o 


0437 P017C 0004 


BZS YITFILtSEGSrZ-^tYIT) 


O 

O 

o 



o 



N79004G5 

L^: 

N790 0 406 


N790 0407 


N790Q408 

o 

N79Q0 409 

N7900410 


N79Q0411 


N7900 i,12 

o 

N790Q 413 

N7900 414 


N7900415 


N7900416 

O 

N79QD417 

N7900418 


N7900 419 


N790042D 

O 



o 

^ N79Q0422 

o 

N7900423 


N7900424 


N7900425 

o 

N7900426 

N790 0 427 


N790D428 

o 

N79QG429 

N79QD430 


N7900 431 



' o 

N7900 432 


N7900433 

o 

N7900434 

N790 D 435 



o 


N790Q437 Q 


o 

o 

o 


C02ND 


PAGE 16 


date: 08/19/99 


o 

o 

o 

o 

o 


0439 




0440 




0441 




0442 




0442 

0180 

P 


0442 

00 04 



0442 

OlEO 

P 


0442 

OlEl 

P 


0442 

01E2 

P 


0 442 

01E3 

P 


0 44? 

01E4 

P 


0442 

01E5 

P 


0 442 

01E6 

P 


0442 

P0180 0000 



0443 



if 


INTERRUPT STACK AND MASK TABL! 
STRTSG IS 


ANALYSIS 


ISG3 HAS INVALID INTERRUPT LINES 


N79QCi+39 
N7900440 
N7900 44i 
N790D442 


N790G443 


o 

o 

o 

o 

o 


O 

0445 

POIBI 

C3 

60 ISO 

LDA 


0446 

P0182 

01 

OE 

SAZ 


0447 

PD183 

CO 

00 

LOA 



PQl 84 

51 

OB 



0446 

P0185 

6310 

STA 


0449 

P0186 

68 

lA 

STA 


G450 

P018 7 

16 

OA 

JMP 

O ‘ 

0451 


01 

82 P 

ECU 


0452 

P0188 

GO 

09 

8ZS 


ISIFG 

ISl 

=XE5100+ATA SETUP FOR AUTOLOAD 

» IS12 
» IS14 
» ISl 

ISITP lISOs-1) 

ISlBUF{16-=*^fIS0 ) 


N790D445 
N79Q0446 
N79Q0 447 

N790 0 448 
N7900449 
N7900450 
N790Q 451 
N7900 452 


o 

o 

o 


o 



0454 




* V- 

» 

*CHECK MAS KT ABLE- INTERRUPT TRAP* 

O 

0 45 5 

PQ191 

OCOF 


ISl 

EMO. 15 

GET MASK TABLE 

D 45 6 

P0192 

COflO 

X 

ISll 

LOA =XMASKT 




PD193 

7FFF 

X 





0457 

P0194 

0 834 



A A Q A 


o 

0458 

P0195 

5101 


IS12 

RTJ- LDA, I 


0459 

P0196 

6 A EB 



STA^ ISlTPiQ 

SAVE IT 


0460 

P0197 

31 72 



SQM ISl 3 



0461 

P0198 

0OF€ 



INQ -1 


o 

0462 

P0199 

18F8 



JMP* ISll 


0 463 

P019A 

E843 


IS13 

LDQ* ISILM 

CURRENT LINE 


0464 

P019B 

GFA2 


IS131 

QLS 2 

GET LEVELS FROM TRAP REGION 


0465 

P019C 

COOO 



LDA =N$1Q0 

o 


P019D 

OlOC 





0466 

P019E 

0834 



AAG A 



0467 

P019F 

0902 



INA 2 



0466 

POIAO 

5101 


IS14 

RTJ- LDA, I 

GET LEVEL 

o 

0469 

PQIAI 

AQ 06 



AND- 6 

0470 

P01A2 

68EF 



STA* ISILV 

SAVE LVL OF LINE 


» N7900454 
N79B0 455 
N790 0456 

N7900457 
N790 0 458 
N790 0459 
N79Q046C 
N79G0 461 
N7900 462 
N7900 463 
N790B464 
N7900465 

N7900466 
N7900467 
N790 0468 
N7900469 
N7900470 


O 

O 

O 

o 

o 

o 


o 


o 


o 


o 


C02ND 
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date: eS/19/99 


0471 

P01A3 

0822 



TRA 

Q 

0472 

POl A4 

GAOO 

ISl 

5 

LDA- 

IS1TP,Q 

0473 

P01A5 

OFCO 

ISl 

51 

ALS 

0 

047 4 

P01A6 

0123 



SAP 

IS152 

0475 

P01A7 

COOO 



LDA 

= AIS 


P01A8 

4953 




ISIERR 

0476 

POl A9 

5818 



RTJ» 

0477 

PQIAA 

ODFO 

ISl 

5? 

INO 

-15 

0478 

POIAB 

0162 



SQP 

IS16 

Qi-79 

POIAC 

OOlO 



INQ 

16 

0480 

POIAO 

18F6 



JMP^ 

ISl 5 

U^o 1 
G482 

POIAE 

E8E3 

ISl 

6 

LDQ^ 

ISILV 

0 48 3 

POIAF 

OOFE 

ISi 

61 

INQ 

-1 

0484 

poieo 

CADI 



LDA’’^ 

IS1TP,Q 

0485 

POIBI 

OFCO 

ISl 

62 

ALS 

0 

0486 

P01B2 

0133 



SAM 

IS163 

0487 

P0183 

COOO 



LDA 

= AUN 


P01B4 

55 4E 




ISIERR 

0488 

PD1B5 

58GC 



RTJ» 

0439 

PG1B6 

0171 

ISl 

63 

SQM 

IS17 

0490 

P0i87 

18F7 



JMP» 

IS161 

0491 






ISILN 

0492 

PQ1B8 

E825 

ISl 

7 

LDQ» 

0493 

P01B9 

ODFE 



INQ 

-1 

0494 

POIBA 

4823 



STQ^ 

ISILN 

0495 

P01B8 

0173 



SQM 

IS179 

0496 

POIBC 

D8E8 



RAO^ 

IS151 

0497 

POIBD 

08F3 



RAO» 

IS162 

0498 

PQIBE 

18DB 



JMP^ 

IS13 

0499 






XISN-ISN 

050 0 

POIBF 

OCOl 

ISl 

79 

ENQ 

0501 

PfllCO 

ICEF 



JMP» 

ilS) 


LVL TO Q 
GET MASK 

NO ERROR 

IS ERROR Q HAS LVL WHICH IS 

GO DO LOWER LEVELS 
BUMP UP 


NO ERROR 

DONE WITH THIS LINE 


DONE WITH ALL LINES 
SET SHIFTS TO NEXT LINE 

EXIT 


N7900 471 
N790 0 472 
N7900 473 
N79C0 474 

INTERRUPTABLE N7900475 

N79Q0 476 
N7900477 
N790 0478 
N7900479 
M790048Q 
N790 0 481 
N7900 482 
N790D483 
N7900 484 
N79D0485 
N790 0 486 
N7900487 

N7900488 
N790Q489 
N79Q049D 
N7900491 
N790C 492 
N7900493 
N790 0 494 
N7900 495 
N7900496 
N7900497 
N79Q0496 
N790Q499 
N7908500 
N7900501 


0503 



V- 



0504 

P 0 1C 1 

•0 0 OQ 

ISIERR. 

NUM 

0 

050 5 

PD1C2 

6808 


STA^ 

ISIETP 

0506 

P01C3 

•4 8CF 


STQ» 

ISlLV+1 

0507 

P01C4 

E819 


LDQ^ 

ISILN 

G50 8 

P01C5 

G820 


LOA'^ 

ISC3 

0509 

P01C6 

A223 


AND- 

$23,Q 

0510 

P01C7 

0103 


SAZ 

ISIEI 

0511 

P01C8 

EaCA 

ISIEXT 

LOQ» 

ISlLV+1 

0512 

P01C9 

1CF7 


JNP» 

(ISIERR) 

0513 

POICA 

0000 

ISIETP 

NUM 

0 

0 514 

POICB 

OAOD 

ISIEI 

ENA 

ISMXN-ISN 

0515 

POICC 

510F 


RTJ- 

GMSiI 

0516 

POiCD 

OAOA 


ENA 

LISM2 

0517 

POiCE 

51 11 


RTJ- 

MOP, I 


MESSAGE OUTPUT 


SAVE IS OR UN 
SAVE ERROR LEVEL 


CHECK IF INVALID LINE 


ERROR 

■EXif-RESTORE Q 


N79flC5C3 
N79005C4 
N790 0 50 5 
N7900506 
N 790 0 507 
N7900508 
N7900509 
N79Q0510 
N79D0511 
N790 0 512 
N79 0 0 513 
N7900514 
N7900515 
N79D0516 
N790Q517 


ERROR MESSAGE 




C02ND 

PAGE 18 OATEJ 08/19/99 


0518 

POICF 

caoE 

LDA» ISILN 

N790D516 

0519 

POIDO 

5103 

RTJ- CONtI 

N7900519 

0520 

POIDI 

412A 

STO- ISM3yi,I SET LINE 

N790052C 

0521 

0521 

P01D2 

CA12 

CDNSTR 2,ISlLy,ISM3V2,IStl3 

N790 0521 

0521 

P01D3 

0C33 



0521 

P01O4 

5100 



0521 

PQ1D5 

0 0 02 



0521 

P01D6 

00 0£ 



0522 

P0107 

C8F2 

LBA^ ISIETP 

N7900522 

0523 

P01O8 

6138 

STA- ISN3yR,T 

N7900523 

0524 

0524 

P01D9 

OAID 

LISTir ISM3 

N7900524 

0524 

POIDA 

0C26 



0524 

PDine 

5105 



0 62 5 

POIDC 

18EB 

JHP» ISIEXT 

N790 0525 

0526 




N7900526 


0 5?fl 

poion 

OOOF ISILN 

N UM 

$F 

N790 0528 

0529 


0192 'P 

EQU 

ISILV (ISITP+IS) 

N790D529 

0531 

POlOE 

00 02 

BZS 

ISFIL (SEGSIZ-'^l-ISl 

N7900531 


C02ND 
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DATES 08/19/99 


o 

o 


o 

o 

o 

o 

o 

o 

o 

o 

' o 
o 

1 





0553 

0554 

0535 

0536 
0536 
0536 
0536 
053b 
0 536 
0536 
0 53 6 
0536 
0536 


OlFQ 
0 0 05 
0240 
0 2 41 
0 2 42 
0 2 43 
0 2 44 
0245 
0 2 46 


0536 FOIEO 0000 


P 

P 

P 

P 

P 

P 

P 

P 




INTERRUPT STACK ANALYIS PART X 
STRTSG XIS 


0538 POIEI 

0539 P01E2 

0540 P01E3 

0541 P01E4 

0542 P01E5 

0543 P01E6 

0544 P01E7 

0545 PC1E8 

0546 


C86Q IS18 
0106 
0844 
68 50 
68 5B 
68 5 F 
0C02 
1CF7 


LDA» XISIFG 
SAZ IS2 
CLR A 
STA^ XISIFG 
STA^ XISHFG 
STA^ XISC3 
ENQ UCN-XISN 
JHIP» JXISJ 


CHECK IF AUTOLOAO DONE 
EXIT TO UC 

CLEAR USED CELL 


0548 

0549 P01E9 5824 

0550 POIEA COOO 
PQ1E8 51QB 

0551 PGIEC 6826 

0552 PQIEO C826 

0553 POIEE Q911 
G55h POIEF 6824 

0555 POIFO 5810 

0556 POIFI £827 

0557 P01F2 CA3B 

0558 P01F3 6826 

0559 P01F4 BA28 

0560 P01F5 0116 

0561 P01F6 ODFO 

0562 P01F7 0162 

0563 P01F8 D820 

0564 P01F9 18F7 

0565 POIFA OCOl 

0566 POiFE 1CE4 


9- V- 9 V- altered MASK TABLE 

IS2 , RTJ* IS2GT GET FAILED MASK TABLE 

LOA =X$5100»-ATA 


IS21 

15211 

15212 
IS23 


STA^ IS2GT2 
LOA» IS2GT3 
INA 17 
STA’^ IS2GT3 
RTJ^ IS2GT 
LDQ^ ISECTR 
LOA* IS2TB2, Q 
STA* ISZCTRs-1 
EOR* IS2TB1,Q 
SAN IS22 
INQ -15 


SOP IS23 


RAO* ISeCTR 


JMP* 

ENQ 


IS21 

YISN-XISN 


JMP* IXISl 


GET AUTOLOAD MASK TABLE 
L'E¥EL 

INITIALLY 
AT FAILURE 
ALTERED 
NOT ALTERED 
DONE 


N790 0 533 
N79Q0554 
N7900 535 
N7900536 


N7900538 
N7900 539 
N7900540 
N7900541 
N7900542 
N7900543 
N7900544 
N7900545 
N79Q0546 


* * * * N79QQ548 

N79SQ549 

N79Q0550 

N7900551 
N79B0 552 
N7900 553 
N790C554 
N790 0555 
N790 Q 556 
N790Q557 
N7900558 
N7930559 
N790 0 560 
N790G561 
N7900562 
N79D0563 
Nrg00564 
N790B 565 
N7900566 


r'l 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


COZMD 
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DATES 08/19/99 


PDIFC 
POIFD 
POIFE 
POIFF 
PO20O 
P0201 
F02 02 

PQ203 

P0204 

PQ205 

P0206 

P0207 

P0 208 
P0209 
PQ20A 
P020B 
PQ2QC 

P020D 
PC20E 
P020F 
P0210 
P0211 
P0212 
P0213 
PO 214 
P0215 
P0216 
P0217 

P0218 

P021B 


CA20 
681D 
OA OC 
510F 
C842 
Gill 
0144 

0A38 
0C4C 
510D 
0 0 03 
0 0 07 

0A19 
0G44 
51 05 
£800 
18E9 

0 00 0 

OCOF 

COOO X 

0193 X 

0834 

5101 

6AQ9 

5172 

0 D FE 

18F8 

1CF5 

0 003 
0 0 22 
021C P 
022D P 


IS22 LDA» IS2TB1,Q 
STA» IS2CTR+2 
ENA ISHXN-XISN 
RTJ- GMStI 
LOA»^ XISHFG 
SAN IS221 
RAO- ISM4,I 


IS2GT NUM 
ENQ 

IS2GT1 LOA 


OUTPUT MESSAGE 


NOT RELATED 


IS221 CONSTR 3 , IS2 CTR , I S M4 VI , XIS, 6 


LISTIT ISH4 


JHP^ 


IS2GT2 

IS2GT3 


IS2GT4 

•V- 

IS2CTR 

IS2TB1 

IS2TB2 


AAO 

RTJ- 

STA» 

SQM 

INQ 

JMP» 

JNP» 


IS2GTR 

IS211 

0 

15 

= XMASKT 
A 

LDA,I 

IS2TB1,Q 

IS2GT4 

-1 

IS2GF1 

(IS2GT) 


GET MASK TABLE 


SAVE 

DONE 


IS2CTRI3) 

IS2BUFC 17»2-) 
IS2T811 IS28UF<-1) 
IS2T82( IS2T81+17J 


O 

0595 P023D 0003 BZS XISFILC SEGSTZ-^+XIS ) 

O 

O 

O 


O 

O 


N7900567 
N7900 568 
N7900569 
N79Q0570 
N79D0571 
N790G572 
N790 0 573 
N7900574 


N79G0575 


N7900576 

N7900577 

N790Q578 

N790Q579 

N7900580 

N7900561 

N79D0 582 
N7900583 
N79Q0 564 
N7900585 
N7900586 
N7900587 
N7900588 
N7900569 
N7900590 
N790 0591 
N790a 592 
N7900593 


N7900595 


c 

C) 

o 

o 

o 

o 

c 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


‘■v..-- 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


€0?ND 


0597 



0598 


if- 

0599 
060 0 



050 0 

0 2 40 

p 

060 0 

0 0 06 


0 60 0 

02 AO 

p 

0600 

02A1 

P 

060 0 

02A2 

p 

050C 

02A3 

p 

0600 

02A4 

p 

0600 

02A5 

p 

0600 

02A6 

p 

0600 P0240 

00 00 



PAGE 21 

INTERRUPT STACK 
STRTSG YIS 


DATES 08/19/99 
ANALYSIS PART Y 


060 2 

0603 P0241 CGOO 
P0242 Q0B8 

0604 P0243 5101 

0605 P0244 683D 

0606 P0245 983B 

0607 P0246 0116 

0608 PC247 GOOD 
P0248 OOEF 

0509 PG249 5101 
0610 P024A 0901 

051 1 P0248 0116 

0512 PD24C 182D 

0613 P02LD 08 42 

0614 P024E 3043 

0615 P024F 0132 

0616 PQ250 09EE 

0617 P0251 0134 
061 e P025? C82E 

0619 PD253 0950 

0620 P0254 6820 

0621 P0255 082A 

0622 P0256 G8A? 

0623 PQ257 C829 

0624 P0258 0904 

0625 P0259 6827 

0626 P025A 5101 

0627 PQ258 OFCl 

0628 P025C 0F41 
0529 PD25D 6A25 

0630 P025E 0822 

0631 PQ25F C821 

0632 P0260 9821 

0633 P0261 0122 


^ Sf 


9 - 

IS3 

LDA 

= X$B8 


RU- 

LDA, I 


ST A* 

IS3TP1 


SUB* 

IS3TP 


SAN 

IS311 


LDA 

= N$EF 


RTJ- 

LOA, I 


INA 

1 


SAN 

IS31 


JMP* 

1339 

IS311 ' 

CLR 

Q 


DVI- 

$43 


S AM 

IS31 


INA 

-17 


SAM 

IS32 

IS31 

LDA* 

IS3TP 


INA 

16*5 


ST A* 

IS3TP1 


RAO* 

IS3FLG 

IS32 

CLR 

Q 

IS33 

LDA* 

IS3TP 


INA 

4 


STA* 

IS3TP 


RTJ- 

LOA, I 


ALS 

1 


ARS 

1 


STA* 

IS3T8,D 


RAO* 

IS3TP 


LOA* 

IS3TP 


SUB* 

IS3TP1 


SAP 

IS34 


'^INTERRUPT STACK ENTRIES » 
TOP 


SOMETHING TO DO 
CHECK PRIORITY LEVEL 

ERROR DUMP ALL OF TABLE 
GET NUM OF ENTRIES 
OK 

SFT TO 16 ENTRIES 
ERROR FLAG 

GET LEVEL 

REHGVF OVERFLOW BIT 
SAVE 


DONE 


N790 0597 
N790 0598 
N790D599 
N79006Q0 



» N7900602 

N79G06D3 

N7900 604 
N790Q6D5 
N790Q&06 
N790 0 e0 7 
N7900608 

N7900609 
M790061D 
N7900611 
. M7900612 
N7900613 
N7900614 
N7900615 
N7900616 
N7900617 
N7900618 
N790061 9 
N7g0D620 
N7900621 
N790Q622 
N7900623 
N7900624 
N79G0625 
N790 0626 
62*1323 N7900627 

62*1323 N7900628 

N790 0 62 9 
N7900630 
N79Q0631 
N7900632 
N7900633 


o 

□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATE! 

o 

0 63 4 

P0262 

ODOl 


INQ 

1 



0635 

0636 

P0263 

18F3 


JHP» 

IS33 


o 

063 7 

P0264 

4810 

IS34 

STQ^ 

IS3TP1 

SAVE Q REG 

Q63 3 

P0265 

OAOC 


ENA 

ISMYN-if ISN 

GET MESSAGE BLOC 


0639 

P0266 

510F 


RTJ- 

GHS,I 


0640 

P0267 

E81A 


LDO^ 

IS3TP1 


o 

0641 

P0268 

4819 

IS341 

STO^ 

IS3TP1 


0642 

P0269 

EA19 


LDQ» 

IS3T8,Q 



0 643 

P026A 

C342 


LDA- 

ISM5I0, B 

GET ASCII LEVEL 


0644 

PD26B 

E816 


LDQ» 

IS3TP1 

O ' 

0645 

PQ26C 

6331 


STA- 

ISH5V1,8 


0646 

P026D 

OTDFE 


INQ 

-1 



0647 

P026E 

0171 


SQM 

IS35 

DONE 

o 

0648 

0649 

P0 26F 

18F8 

'# 

JMP» 

IS3 41 


0650 

PD270 

C8 OF 

IS35 

LOA=^ 

IS3FLG 



0651 

PD271 

0114 


SAN 

IS351 

ERROR 


0652 

P0272 

D126 


RAO- 

ISMS, I 


o 

0653 

P0273 

G82F 


LOA^ 

yiSMFG 


0654 

P0274 

0111 


SAN 

IS351 



0655 

P0275 

D126 


RAO- 

ISMS, I 

NOT RELATED 


065 6 



IS351 

LISTIT ISMS 

o 

0656 

P0276 

OAIA 





0656 

P0 277 

0C26 






0656 

P0 278 

5105 






0 65 7 

PD279 

0 8 42 

IS39 

CLP 

Q 


o 

0658 

P027A 

48 28 


STQ^ 

YISMFG 


0659 

P027B 

OC05 


ENQ 

LISM1-LISM2 



0660 

P027C 

4825 


STQ^ 

YISIFG 



0661 

P027D 

OCFD 


ENQ 

ISM-YIS N 


o 

0662 

P027E 

ICCi 


JHP» 

•lYISS 


0663 

P027E 

0000 

IS3FLG 

NUM 

0 



0 66 4 

P0280 

7FFF X 

IS3TP 

ADC 

INTSTK 



0665 

PD281 

GOOD 

IS3TP1 

NUH 

0 


o 

0666 

P0282 

0010 


BZS 

IS3T8116) 


o 

1 

0668 

PC292 

OOOE 


BZS 

YISFILCSEGSIZ 

-» +YlS ) 


o 


o 

o 

o 


o 


N79Q063it 
N790 Q&35 
N7900&36 
N7900637 
N79G 0 638 
N7900639 
N7900640 
KI790G641 
N79QO 642 
N79G 0643 
N7900644 
N7900645 
N7900646 
N790 0 6i.7 
N7900646 
N79fl0649 
N790Q650 
N7900651 
N79fl0652 
N7900653 
N79Q0654 
N7900655 
N79Q0656 


N79Q0657 

N790D658 

N7900659 

N7900560 

N79Q0661 

H7900662 

N790D663 

N7900664 

N7900665 

N7900666 


N7900668 


C-' 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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OATES 08/19/99 


067 0 



3^ 


N790067D 

0671 




LOGICAL UNIT CAPABILITY 

N79Q0671 

0672 





N7900672 

0673 




S7RTSG UC 

N7900673 

0 67 3 

02AO 

P 




0673 

0 0 07 





0673 

0300 

P 




0673 

0301 

P 




0673 

0302 

P 




0 67 3 

0 3 03 

P 




0673 

0304 

P 




0 673 

0305 

P 




0673 

0306 

P 




0673 P02AG 

00 00 






0 675 

P02A1 

C660 


UGIFG 


N7900 675 

0676 

P02A2 

0105 

SAZ 

UCl 


N7900676 

0677 

P02A3 

P92A4 

cooo 

51 QB 

LDA 

=X$51Q0+ATA 

SET FOR AUTG LOAD IMAGE 

N7900677 

0678 

P02A5 

6805 

STA» 

UCll 


N790 0678 

0679 

P02A6 

6808 

STA«^ 

UC12 


N790 0679 

068 0 

P02A7 

6609 

STA'^ 

UC13 


N790Q68D 


0682 




» if 

^ W- 9 

’CHECK STANDARD LU CAPABILITY ’ 


9 

’ N7900682 

0 68 3 

P02A8 

COOO 


UCl 

LDA =N$F9 





N7900683 


PC2A9 

0aF9 









0 68 4 

P02AA 

8835 



AOD'» UCICTR 





N7900684 

0685 

PQ2AB 

5101 


UCll 

RTJ- LDA, I 

GET LU HUM 




N79a0685 

0686 

PQ2AC 

8000 

X 


AOD =XL0G1A 





N7900686 


P02AD 

7FFF 

X 








0687 

P0 2AF 

51 01 


UG12 

RTJ- LDA, I 

GET PHYSTO 




N7900687 

0688 

PD2AF 

0908 



INA 8 





N7900688 

0689 

P0 2EG 

5101 


UC13 

RTJ- LDA, I 





N7900689 

0690 

PG281 

0FC6 



ALS 6 





N79B0690 

0691 

P02B2 

AOIG 



AND- SIC 

GFT 6 BITS 

FOR, TYPE CODE 



N7900691 

0692 

P02B3 

0 8 42 



CLP. Q 





N79D0692 

0693 

P02B4 

0FE3 



LLS 3 





N7900693 

G594 

P02B5 

0FC4 



ALS 4 

FND AROUND 

TIMES 2 



N7900694 

0695 

P02B6 

P02B7 

P02B8 

■80 0 0 
DFCO 



ADD =NSFCQ 

FORM SHIFT 




N7900695 

0696 

0901 


UC134 

INA 1 





N79C0696 

0697 

P02B9 

68 02 



STA'*^ UC135 





N790 Q697 

0698 

P-02BA 

CA26 



LDA» UClDGTtQ 





N7900698 

0699 

P02BB 

OOGC 


UC135 

HUM 0 

PLUGGED SH 

IFT 



N7900699 

0700 

P02BC 

012E 



SAP U Cl 8 

ERROR 




N790070D 
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OATE-i 08/19/99 



o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o, 

o 

o 

o 


0701 P02BD E822 

0702 P02BE 0153 

0703 PD2BF C8F8 

0704 P02C0 09FE 

0705 P02C1 68F6 

0706 P02C2 OOFC 

0707 P02C3 0151 

0708 P02C4 D8F3 
070 q P0 2C5 ODFE 

0710 P02C6 0142 

0711 P02C7 0818 

0712 P02C8 18DF 

0713 P02C9 OCOl 

0714 P02CA 1CD5 

0715 

0716 P02CB OAOC 

0717 P02CC 510F 

0718 PD2C0 OAIQ 

0719 P02CE 5111 

0720 P02CF E810 

0721 P02D0 C33A 

0722 P02O1 612E 

0723 P02O2 0148 

0724 PD2D3 ODFB 

0725 P02D4 0146 

0726 P02D5 COOO 
P02D6 5752 

0727 P02D7 6134 

072 8 P02O8 CO 00 

PD2D9 4954 

0729 P02DA 6135 

073 0 

0730 PQ2DB OA OO 
0730 P02DC 0C2C 

0730 P02DD 5105 

0731 P02DE 18DE 

0732 

0733 P02DF 0000 

0734 


0736 

0737 

0738 0001 
0002 
00 03 

073 9 
Q740 

0740 PO2E0 OBFF 

0741 


UC1351 LDQ^ UCICTR 
SQM UG136 
LDA^ UC134 
INA -1 
STA» UC134 
UC136 INO -3 

SON UC137 
RAO^ UC134 
UC137 ,INQ -1 

SQZ UC19 
RAO-^ UCICTR 
JMP» UCl 

UC19 ENQ WUCN-UCN 
JMP^ (UC) 

UC18 ENA UCMXN-UCN 
RTJ- GMS,I 
ENA 1UCM2 
RfJ- MOP, I 
LDQ^ UCICTR 
LDA- UCM3TB,B 
STA- UCM3V1, I , 
SQZ UC181 
INQ -4 
SQZ UC181 
LDA =AWR 

STA- UCM3V2, I 
LDA =AIT 

STA- UCM3\/2»-l,I 
UC181 LISTIT UCM3 


JMP^ UC1351 
UCICTR NUM 0 


NO ERROR 

CHANGE TO WRITE DEVICES 

BACK TO READ ‘ 

DONE 


GET MESSAGE BLOCK 
ERROR MESSAGE 

READ 

PEAD 

WRIT 


» DEVICE CAPABILITY TABLE 

EQU RU),W(2),B>IR4W) READ/WRITE CAPABILITY 

UCIDCT DEVCAP 8, K, W , B , B, 8., B , 8 
DEVCAP B,8,W,B,B,0.,a,B 


N7900701 
N79007G2 
N79007D3 
N7900704 
N790 0 70 5 
N79007D6 
N7900707 
N79007Q8 
N790Q709 
N79Q0710 
N7g007il 
N7900 712 
N7900713 
N79G0714 
N790 0 715 
N7900716 
N7900 717 
N7900 718 
N79B0719 
N790 0 720 
N7900721 
N7900722 
N7900723 
N79Q0724 
N7900 725 
N790D726 

N79Q 0727 
N7900 728 

N7900729 

N79Q0730 


N790D731 

N7900732 

N7900733 

N7900734 


N7900736 

N7900737 

N79S0738 


N79Q0739 
»»MSOS 4,1»»N790074D 

»»MSOS 4.1»»N7900741 


o 

n 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


C02N0 
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date: G8/19/99 


o 

o 

o 


o 

o 

o 


DEVCAP 

DEVCAP 0,8,8,H,R,R ,E,B 
DEVCAP B,8,W,R,B,W,’R,B 
DEVCAP e,R ,8 
DEVCAP W,W,W»B,9,BtB,B 
DEVCAP B,W,R,W,8tB,0»0 


BZS UCFIL (SEGSIZ-'^+UCl 


o 


o 

*»HSOS 4-1*=^N7900742 

»»MS0S 4.1»^N7900743 Q 

N7900744 

N7900745 Q 

N790 0 746 

N7900747 Q 

O 

N79Q 0 749 

O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 
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DATE: 08/19/99 



N790G 751 
N7900 752 
N7900753 
N790 0754 


N79Q 0 756 
N7900757 
N7900758 

N79D0759 

N7900760 

N79Q0761 

N790-0762 


N7900764 

N7900765 

N7 90 0 76 6 
N79QD767 
N79C0766 

N7900769 
N790Q770 
N79G0771 
N790G 772 
N79Q0773 
N790D774 
N7900775 
N7900 776 
N79G0777 
N79D0778 
N79Q0779 
N790G780 
N7900781 
N79Q 0782 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATES 08/19/99 


0733. 

PQ31C 

G82B 


LOA«^ 

UC2CTR 

0784 

P031D 

5818 


RTJ» 

UC2GCP 

0785 

P031E 

E328 


LDQ^^ 

UC2 TP 

0 786 

P0 31F 

0106 


SAZ 

UC251 

0787 

P0320 

01 46 


saz 

UC26 

078 8 

P0321 

ODFC 


INQ 

-3 

0789 

PQ322 

0163 


SQP 

UC251 

0790 

P0323 

0DQ3 



3 

0791 

P0 324 

0 8 74 


EAQ 

A 

G792 

P0325 

0111 


SAN 

UC2 6 

0793 

P0 326 

18EC 

UC2 51 

JMP'^ 

UG231 

0794 






0795 

P0327. 

0A08 

UC26 

ENA 

UGMXN-WUCN 

0796 

P0328 

510F 


RT J- 

GMStl 

0797 

P0329 

QAIO 


ENA 

LUC M2 

0798 

P0 32A 

5111 


R¥ J- 

MOP, I 

0799 

PQ32B 

C81D 


LOA* 

UC2ALU 

080 0 

P032C 

5103 


R¥J- 

CON, I 

080 1 

P032D 

4142 


STO- 

UCM4yi, I 

080 2 

P032E 

C8 19 


LDA^ 

UC2CTR 

0803 

P032F 

5103 


RTJ- 

COM, I 

0804 

P0330 

41 4C 


STQ- 

UCM4V2, I 

080 5 




LISTIT UCM4 

080 5 

P0331 

DAIA 




0805 

P0332 

0C3F 




080 5 

P0333 

5105 




0806 

P0334 

18DE 


JMP» 

UC231 

080 7 





GET LU CAPi 

0803 

P0 33 5 

0 0 0 0 

UC2GGP 

HUM 

0 

08D9 

P0336 

8803 


ADO^ 

UC2 + 1 

0810 

P0337 

5101 

UC2G1 

RTJ- 

LDA,I 

0811 

P0338 

0908 


INA 

8 

0812 

P0339 

5101 

UC2G2- 

RTJ- 

LDA,I 

0813 

PQ33A 

0FC6 


ALS 

6 

0814 

P0 33B 

AOIC 


AND- 

$1C 

0815 

P0 33G 

0642 


CLR 

Q 

0816 

P033D 

0FE3 


LLS 

3 

0817 

P033E 

0FG4 


ALS 

4 

0818 

P033F 

800 0 


A DD 

= N$FC2 


PQ34Q 

0FC2 




0819 

P0341 

68 02 


STA^ 

UG2SF 

0820 

P0 342 

GA 07 


LDA'^ 

UC2DCT,Q 

0821 

PQ 343 

00 00 

UC2SF 

NUM 

9 

0822 

P0344 

A004 


AND- 

4 

0823 

P0345 

ICEF 


JMP’ 

(UC2GCP ) 

082 4 






0825 

P0 346 

0000 

UC2TP 

NUM 

Q 

0826 

P0347 

0 0 01 

UC2CTR 

NUM 

1 

0827 


0363 

P UC2NLU 

EQU 

UC2NLU ( WUC 

0828 

PO 348 

0 0 00 

UC2ALU 

NUM 

0 


GET LU CAPABILITY 

NO POSSIBLE ERROR 
■ERROR 

NO POSSIBLE ERROR 


ERROR 
NO ERROR 


SET UP MESSAGE 


LOGIA ENTRY 

BITS WITH TYPE CODE 
END AROUND 

PIUGGED-PUT BITS IN BITS 0 AND 1 
RETURN 


N7900783 
N7900784 
N79G0785 
N7900786 
N79Q 0 787 
N790 0788 
N79G0789 
N79Q0790 
N790 0791 
N790D792 
N790Q793 
N79Q079A 
N7900795 
N790Q 796 
N7 90 0797 
N790Q798 
N7900799 
N790 0800 
N7900801 
N79D08D2 
N7900aD3 
N79Q080A 
N7900B05 


N79OO806 

NF900807 

N790G8G8 

N790G809 

N7900810 

N7900811 

N7900812 

N7900813 

N790Q814 

N7900815 

N79Q0816 

N7900817 

N7900818 

N7900819 
N790C 820 
M790fi821 
N7900822 
N7900823 
N79Q0 82^4 
N79G0825 
N7900826 
N79Q 0827 
N7900 826 


o 
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DATEi 08/19/99 


O 

O 

O 

O 

O 

O 


0830 

0631 

0832 UC20C T 
0332 P0349 DBFF 

083 3 

0833 P034A FBCF 

0834 

0834 P034B EAFD 
083 5 

0835 PD34C FE5F 

0836 

0636 PD34D F9E7 
0 837 

0837 P034E 0F55 

0838 

0838 P034F A8FF 

0839 

0839 P0350 E6F0 


DEVICE CAPABILITY 
OEVCAP B, R, W<8,8,B,B,8 
DEVCAP 8,8, 0,B,B 
OEVCAP 8,W,W,W,B,B,B,R 
OEVCAP B,B,B,W,R,R,8,B 
DEVCAP W-,RtB 

DEVCAP 8,R.,8,8,R,R,R,R 
OEVCAP W,H,W,8,e,8,8,8 
OEVCAP 


P0351 0844 UC29 CLR A 

P0352 6810 STA» WUCMFG 

P0353 C80E LOA^^ WUCIFG 

P0354 0114 SAN UC299 

P0355 DA05 ENA LUGM1~LUGH2 

P0356 680B STA» WUCIFG 

P0357 OCFE ENQ UCN-WUCN 

P0358 1GA7 JHP^^ tWUC) 

P0359 08 44 UC299 CLR A 

P035A 6807 STA^ WUCIFG 

P035B OCOl ENQ LUN-WUCN 

P035C 1CA3 JHP» fWUC) 


EXIT 


GO 00 AUTO LOAD 


EXIT TO LU CHECKS 


O 

0855 P035D 0003 BZS WUCFTL f SEGS I Z-* + W UC 1 

o 

o 

o 

o 

o 


N7900 330 
N7900831 
»-HS0S 4,1*^»N7900832 

»»MS0S 4.1^^^N7900833 

»»MSOS 4, 1^»N7900834 

»^MSOS 4.1»»N7900835 

N7900836 

N790 0837 

N7900838 

N7900839 


N790Q841 
N79flOS42 
N7900843 
N7900 844 
N790 0845 
N7900846 
N7900847 
N79D0848 
N79G0849 
N790085D 
N7900851 
N7900852 
N7900853 


N790Q855 


O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATEi 08/19/99 


0857 




0658 




0859 




085 0 




0850 

0360 

P 


0860 

0 0 09 



085 0 

0 6 C 0 

P 


0860 

0 3 Cl 

P 


0860 

03C2 

P 


0860 

0 3C3 

P 


0860 

03C4 

P 


086 0 

03C5 

P 


0860 

03C6 

P 


0860 

P0360 0000 




LOGICAL UNIT ANALYSIS 
STRTSG LU 


N7900 857 
N790 0 856 
N790Q859 
N790086D 


0862 

P0361 

C860 

LOA» 

LUIFG 

0863 

P0362 

0109 

SAZ 

LUl 

0864 

P0363 

CO 0 0 

LDA 

= X$51 


Pu 364 

5108 



0865 

P0365 

6809 

STA^ 

LU121 

0866 

^>0366 

6800 

STA=*^ 

LU131 

0867 

P0367 

681A 

STA=^ 

LU21 

0868 

P9368 

68 1C 

STA^ 

LU22 

C869 

P0369 

6821 

STA« 

LU23 

0870 

P036A 

682C 

STA«^ 

LU31 

0871 

P0368 

6830 

STA^ 

LU3 31 


QO+ATA 


N7900862 

N790Q863 

N7900864 

N7900865 
N799 0 366 
N7900867 
N7900866 
N7900869 
N7900870 
N7980871 


0873 





¥■ 

» •• 

0B74 

P036C 

COOO 

X 

LUl 

LDA 

=XL0G1 


P036D 

0 3 0E 

X 



LDA ,I 

0875 

P036E 

51 01 


LU121 

RTJ- 

0876 

PQ36F 

8854 



EOR» 

LUCl 

0877 

P0370 

0115 



SAN 

LUl 9 

0878 

P0 371 

COOO 

X 


LDA 

=XL0G2 


P0372 

7FFF 

X 




0879 

P0373 

5101 


LU131 

RTJ- 

LDA , I 

088 0 

P0374 

B84F 



EOR^ 

LUCl 

0881 

PQ375 

0108 



SAZ 

LU2 

0882 

P0376 

5843 


LU19 

R¥J» 

LUIER 

0863 

P0377 

C84C 



LDA=» 

LUGl 

0 8 8 ■+ 

P0378 

0901 



INA 

1 

0885 

P0379 

5103 



RTJ- 

CON »I 

0 88 6 

P037A 

4138 



STQ- 

LUM3V1* I 

0887 



LISTIT LUM3 

0887 

P037B 

OAll 






■^NUH OF LOGICAL UNITS 


COMPARE 

'ERROR 


COMPARE 
NO ERROR 


SAVE ASCII 


» N7990 873 
N790 0874 

N7900376 
N7900 876 
N7900877 
N7900876 

N7900879 
N790D880 
N7900881 
N7900882 
N7900883 
N79Q0884 
N790 0885 
N79QD886 
N7900887 


C02ND 


PAGE 30 


DATE-1 08/19/99 



u 

0887 

P0 37C 

0C2A 



0887 

0888 

P037D 

5105 


o 






O 

089 0 




V 9 

♦ 

* 


0891 

P037E 

CO GO 

X 

LU2 

LDA 

•=XL0G1A 



PQ37F 

030A 

X 




o : 

0892 

P0380 

0901 



INA 

1 

0893 

P0381 

5101 


LU21 

RTJ- 

LDA, I 


089i* 

P0362 

0822 



TRA 

Q 


0895 

P0383 

0901 



INA 

1 

O 

0896 

P0384 

5101 


LU22 

RT J- 

LDA, I 

0 89 7 

P0385 

BOQO 

X 


EOR 

=XICORE 



P0386 

7FFF 

X 





0898 

P0387 

0 117 



SAN 

LU28 

O 

0899 

P0388 

Q814 



TRQ 

A 

0900 

PQ389 

0908 



INA 

8 


090 1 

P0 38A 

5101 


LU23 

RTJ- 

LDA ,I 


0902 

P0388 

OF 4-4 



ARS 

4 

o 

0903 

P038C 

A008 



ANO- 

8 

090 4 

PQ38D 

09F2 



INA 

-13 


0905 

P038E 

01 04 



SAZ 

1U3 


090 6 

P038F 

582A 


LU28 

RTJ» 

LUIER 

o 

090 7 





LISTIT LUMA 

0907 

P0 390 

0 AOC 






0907 

P0391 

0G3C 






0907 

P0 392 

5105 






o 


^CORE ALLOCATOR*^ » 

ADDRESS OF PHYSTB FOR LU 1 
SAVE 

ERROR 

CHECK type code 
NO ERROR 



O 


□ 

N79DQ308 

O 


N7900390 

o 

N7900391 


N79DD892 

o 

N7900893 

N790 0894 


N79Q0895 


M790G896 

o 

N7900897 

N7900898 


N7900899 

o 

N79D090D 

N79u0901 


N79Q0902 


N7900903 

o 

N790D904 


N79Q0905 


N7900906 


N7900907 

o 


o 

N7900909 

o 

N7900910 


N790Q911 


N7900912 

o 

N7900913 

N79G0914 


N79oagi5 


N7960916 

o 

N7900917 

N79B0918 


N7900919 


N790092Q 

o 


O 


o 

o 


N79009Z1 

N79Q0922 
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0923 

P03A2 

Q122 

0924 

PQ3A3 

0814 

0925 

PO 3A4 

18 EE 

0926 


OCOi 

0927 

PO 3A5 

0928 

PO 3A6 

1CB9 

0929 

P03A7 

0 8 34 

0930 

P03A8 

5101 

0931 

PQ3A9 

9011 

0932 

P03AA 

0111 

0933 

P03AB 

18ED 

0934 

P03AC 

01 43 

0935 

PQ3AD 

ODFE 

0936 

P03AE 

C80A 

0937 

P03AF 

18F7 

0938 

P03BO 

C808 

0939 

P03B1 

5101 

0940 

P03B2 

OF 48 

0941 

P03B3 

09AO 

0942 

P03B4 

QlDl 

0943 

P03B5 

18 £3 

0944 



0945 

P03E5 

18E9 

0946 



0947 

P03B7 

0002 

0948 

P03B8 

OQOO 

0949 



0950 

P03B9 

0 OQO 

0951 

P03BA 

0A08 

0952 

PD3BB 

510F 

0953 

P0 3BC 

OAOE 

0954 

P03BD 

5111 

0955 

PG3BE 

ICFA 

0956 





SAP LU39 
RAO^ LU3CTR 
JMP-^ LU3 

LU3 9 

ENQ WLUN-tUN 
JMP» fLU) 

LU33 

AAO A 

LU331 

RTJ- LBA,I 
SUB- $11 
SAN LU332 
JHP» tU38 

LU332 

SQZ LU34 

LU333 

INQ -1 
LOA*^ LU3TAD 
JMP-» LU33 

LU34 

LDA» LU3TAD 
RTJ- LOA,I 
ARS 8 
INA -$52 
SAZ LU35 
JMP» LU38 

9 

LU35 

if. 

JMP» LU36 

LU3CTR 

NUM 2 

LU3TAB 

NUH 0 

LUIFR 

NUM 0 


ENA LUMXN-LUN 
RTJ- GMS,I 
ENA LLUM2 
RTJ- MOP, I 
JMP’^ ILUIERI 


DONE, 

EXIT 

CHECK TABLE 3 ENTRIES 
ERROR 

RESTORE I=PHYST8 

CHECK FOR PART 1 REQUEST CODE 
OK 

ERROR 
GO ON 

START WITH LOGICAL UNIT 2 
ERROR ROUTINE 


N790 

N790 

N790 

N790 

N790 

N790 

N790 

N790 

M790 

N790 

N790 

N790 

N79Q 

N790 

N790 

N79Q 

N790 

N79Q 

’^’•HSOS 4.0N790 
N790 
N790 
N790 
N790 
N790 
N790 
N79G 
N79Q 
N79Q 
N790 
N790 
N790 
N790 
N790 
N790 


0958 P03BF OQQl 


BZS LUFIL (3EGSIZ-^+lU^ 


0 923 
0 92 4 

0925 

0926 

0927 

0928 

0929 
0 93 0 
0931 
0 932 
0933 
0 93 4 
0935 
0 93 6 
0 93 7 
0 938 

0939 

0940 
9941 

0942 

0943 
9 944 
0 945 
0 946 

0947 

0948 

0949 

0950 

0951 

0952 

0953 
0 95 4 
0 95 5 
0956 


N7900 958 
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OATEJ 08/19/99 


095 0 




0961 



• 9 - 

0962 




0963 




0963 

0 3. CD 

P 


0963 

OCOA 



0963 

0 A20 

P 


0963 

0 421 

P 


0963 

0422 

P 


0963 

0423 

P 


0953 

0424 

P 


0963 

0425 

P 


0963 

0426 

P 


0963 P03C0 

OQGO 




LOGICAL UNIT ANALYSIS PART W 
STRTSG WLU 


N79Q096D 
N790Q961 
N 790 0 962 
N7900963 


0965 

PQ3C1 

G860 

LDA^ 

WLUIFG 

0966 

P03C2 

0106 

SAZ 

LU4 

0967 

P03C3 

GOOD 

LDA 

=X$5100+ATA 


P03C4 

51 OB 



0 968 

P03C5 

581B 

STA®^ 

LU51 

0969 

P03C6 

68 41 

STA^ 

LU5H1 

0 97 0 

P03C7 

6848 

STA’*^ 

LU5M3 

0971 

P03C8 

1 316 

JNP^ 

LU5 


M7900965 

N790D966 

N7900967 

N7900968 

N7900969 

N7900970 

ONLY ON FAILED IMAGE N7900971 


0973 





Jf. 9. 

r- 

0974 

P03C9 

GOOD 

X 

LU4 

LDA 

=XL0G1 


P0 3CA 

036D 

X 




0975 

P03C8 

8812 



ADD* 

LU4CTR 

0976 

P03CC 

5101 



RTJ- 

LDA, I 

0977 

P03CD 

3FC2 



ALS 

2 

0978 

P03CF 

0135 



SAM 

LU42 

0979 

P03CF 

G8 0€ 


LU41 

LDA* 

LUACIR 

0980 

P0 3D0 

93 53 



SUB* 

WLUCl 

0961 

P03D1 

012C 



SAP 

LU5 

0982 

P03D2 

D80B 



RAO* 

LU4CTR 

0983 

0984 

P03D3 

18F5 



JMP* 

LU4 

0985 

P03D4 

OAOA 


LU4 2 

ENA 

LUMXN-' 

0986 

P03D5 

510F 



RTJ- 

GHS,I 

0987 

P03D6 

C807 



LDA* 

LU4CTR 

0988 

P03D7 

5103 



RTJ- 

CON, I 

0989 

P03D8 

415A 



STQ- 

LUM6V1 

0990 





LISTIT LUM6 

0990 

P03D9 

DAOB 





0990 

PG3DA 

0C57 






♦ ^HARKED DOWN LOGICAL UNITS 

GET LOGl ENTRY 

MARKED DOWN 

DONE ALL LU 
DONE 

LUN 


» » » ^ N7gQ0973 

N790G97A 

N790 0975 
N790D976 
N79a0977 
N7900978 
N79Q0979 
N790a98D 
N79G0981 
N7900982 
N790D983 
N790 098A 
N7900985 
N790Q986 
N790D987 
N79D0988 
N7900989 
N790 0990 
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OATES 08/19/99 



0990 
0 991 
0992 

P03DB 

P03DC 

5105 
18 F2 

JMP^ 

V- 

LU41 

o 

0993 

P03DO 

0 0 01 

LU4CTR NUM 

1 


o 

0995 



» if- 

9 

» 9 


0996 

P03OE 

C8EB 

LU5 

LDA» 

LU4+1 

o 

0997 

P03DF 

8838 


ADD» 

LU5CTR 

0 99 8 

PD3E0 

5101 

LU51 

RTJ- 

LDA,I 


0999 

PQ3E1 

OFCl 


ALS 

1 


lOOD 

P03E2 

0127 


SAP 

LU53 


1001 

P03E3 

5820 


RTJ^ 

LU5HAT 


1002 

PQ3E4 

014A 


SQZ 

LU57 


1003 

P03E5 

C8 32 

LU52 

LDA» 

•LU5CTR 


1004 

P03E6 

983D 


SUB^ 

WLUCl 

o 

1005 

P03E7 

0125 


SAP 

LU599 

1006 

P03E8 

D82F 


RAO^ 

LU5GTR 


1007 

1008 

P03E9 

18F4 


JMP» 

LU5 

o 

1009 

PD3EA 

5819 

LU53 

RIJ^ 

LU5MAT 

1010 

PQ3EB 

0153 


SQN 

LU57 


1011 

1012 

P0 3EC 

18F8 


JMP* 

LU52 

o 

1013 

P03ED 

OGOl 

LU599 

ENQ 

XLUN-WLUN 

1014 

P03EE 

ICOl 


JMP* 

IWLUJ 


1015 

P03EF 

4827 

LU57 

STQ» 

LU5LTP 


1016 

P0 3F0 

OAOB 


ENA 

LUHYN-WLUN 

o 

1017 

P03F1 

51QF 


RTJ- 

GHS,I 

1018 

PQ3F2 

OAOE 


ENA 

LLUM2 


1019 

P03F3 

5111 


RTJ- 

HOP, I 
LU5CTR 


1020 

P03F4 

C823 


LDA» 

o 

1021 

P03F5 

5103 


RTJ- 

CON, I 

1022 

P03F6 

C820 


LDA* 

LU5LTF 


1023 

P03F7 

0115 


SAN 

LU58 


1024 

PG3F8 

4120 


STO- 

LUR7V1 , I 

o 

1Q2 5 



LU571 

LISTIT LUM7 

10 2 5- 

P0 3F9 

OAOF 





10 2 5 

PQ3FA 

0C?A 





1025 

P03FB 

5105 




o 

1326 

1027 

P03FC 

18E8 

■9- 


LU52 


1028. 

P03FD 

413D ' 

LU58 

STQ- 

LUM8V1, I 


1029 

P03FE 

5103 


RTJ- 

CON, I 

o 

1030 

P03FF 

41 41 


SIQ- 

LUM8V2,I 

1031 

POyOO 

0A16 


ENA 

LLUM8 


1032 

P0401 

0C3A 


End 

LUM8 


10 33 

P0402 

18F8 


JMP» 

LU571+2 

o 

103 4 



9 



o 








^ SHARED DEVICES 


NOT SHARED 
LOOK FOR MATCH 
NO MATCH ERROR 
MATGH-OK 

ALL DONE 


NATCH ERROR 
NO ERROR 

GO ON 

ERROR SAVE NATCH IF' ANY 


NO SHARED BIT SET MESSAGE 
NO HATCH MESSAGE 


OUTPUT LUM8 
MATCH LU 


N7900991 

N79D0992 

N79DQ993 


» » » N79Q0995 

N790 0 996 
N7900997 
N7900998 
N79QQ999 
N7901Q00 
N7901001 
N7901002 
N7901003 
N79D1004 
N7901005 
N79C10D6 
N7901307 
N79Q1008 
N7901009 
N79G131G 
N79B1011 
N7901Q12 
N79Q1313 
N7901014 
N7901015 
N79Q1016 
N79S1017 
N79G1018 
N7901019 
N7901020 
N7901021 
N79Q1022 
N7901023 
N79810Z4 
N7901025 


N7901S26 

N79Q1027 

N7901026 

N7901029 

N7901030 

N7901031 

N7901032 

N7901033 

N7901034 


□ 

O 


o 


o 

o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


o 
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o 


o 

o 

o 

o 

o 

o 

o 


103 6 ^ 

1037 P0403 0000 LU5MAT NUM 0 

1038 PO-404 COOO X LU5ML1 LOA =XL0G1A 
PQ405 037F X 

1039 P0406 8811 ADD» LU5CTR 

1040 P0407 5101 LU5M1 RTJ- LDA,I 

1041 P0408 680E SI LU5LTP 

1042 P0409 E81A LDQ* WLUCl 

1043 P040A C80O LU5M2 LDA» LU5CTR 

1044 P040B 0874 EAQ A 

1045 P04GC 0105 SAZ LU5M4 

1046 

1047 P0400 C8F7 LDA'^ LU5HLH-1 

1048 P040E 0834 . AAQ A 

1049 P040F 5101 LU5M3 RTJ- LDA,I 

1050 P0410 8806 ' FOR'# LU5LTF 

1051 P0411 0103 .. SAZ LU5MEX 

1052 P0412 OOF'E LU5M4 INQ -1 

1053 P0413 0141 SQZ LU5MEX 

1054 P0414 18F5 , JHP» LU5M2 

1055 P0415 ICEO LU5MEX JMP* CLU5MAT) 

1056 ■ ^ 

1057 P0416 0000 LU5LTP NUN 0 

1058 P0417 0001 LU5CTR NUM 1 


GET LOGICAL UNIT HATCH 


SAVE PH7STB 

1 CARD DELETED 
GET PHYSTB 

•EXIT FOUND - Q SET TO LU NUM. 
EXIT NOT FOUND Q SET TO ZERO 

START LU 1 


O 1060 P0418 0008 


BZS WLUFTL(SEGSIZ-» + WLU') 


o 

o 

o 

o 

o 

o 

o 


N79Q1036 

N7901037 

N7901038 

N7901039 
N790104G 
N7901041 
N79D1042 
N7901C43 
N7901044 
N79Q1 045 
N7901046 
N7901047 
N7g01Q48 
N7901D49 
N79Q1050 
N79Q1051 
N7901052 
N79D1053 
N79Q1054 
N79Q1055 
N7901056 
N7901057 
N7901058 


N790106D 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 
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DATE? 08/19/9 9 


1062 




1063 




1064 




1065 




1065 

0420 

P 


1065 

0 0 OB 



106 5 

0480 



1065 

0481 

P 


1065 

G482 

P 


1065 

0483 

P 


106 5 

0484 

P 


1065 

0485 

P 


106 5 

0486 

P 


1065 P0 420 

0 0 00 




LOGICAL UNIT ANALYSIS PART X 
STRTSG XLU 


N79Q1062 

N7901Q63 

N790106A 

N7901065 


1067 

PO 421 

C8 60 



LOA^ 

1068 

P0 422 

0106 



SAZ 

1069 

P0 423 

0 8 44 



CLP 

1070 

P0424 

685F 



STA^ 

10 71 

P0425 

6S5C 



STA'» 

1072 

PD426 

68 5C 



STA^ 

1073 

P0427 

OCOC 



ENQ 

1074 

P0428 

1CF7 



JHP» 

1075 




♦ V- 


1076 

P0 42 9 

C300 

X 

LU6 

LOA 


PQ42A 

0405 

X 



1077 

P0 42B 

8834 



AOO*^ 

1078 

PD42C 

5101 



RTJ- 

1079 

P042D 

68 33 



STA» 

108Q 

PG 42E 

09 05 



INA 

1081 

P042F 

5101 



Rf J- 

1082 

P D 43 0 

B82F 



EOR'» 

1083 

P D 431 

0107 



SAZ 

1084 

P0432 

G82D 


LU61 

LOA^ 

108 5 

P0433 

98 50 



SU8» 

1086 

P0434 

0132 



SAM 

1087 

PO 43p 

OGOl 



END 

1088 

P0 436 

1CF9 



JHP» 

1089 

P0437 

D826 


LU63 

RAO=^ 

1090 

P0438 

18F0 



JMP» 

1091 






1092 

P0439 

G827 


LU65 

LDA^ 

1093 

PD43A 

0906 



INA 

1094 

P043B 

5101 



RTJ- 

1095 

PQ43C 

6825 



STA^ 

1096 

PD43D 

0C0 5 



ENQ 

1097 

P0 43E 

DS34 


LU551 

AAQ 

1098 

PQ43F 

5101 



RTJ- 

1099 

P0440 

6A22 



STA» 


XLUIFG 

LU6 


A 

XLUCl 

XLUIFG 

XLUHFG 

NEXTN-X'LUN 

IXLUl 

ALL DONE WITH LU 

=XL0G1A 

LU6CTR 

♦ACTIVE DRIVERS^ 

LDA ,I 
LU6PT 
5 

LQA^I 

LU6CTR 

GET PHY STB 

LU65 

LU6CTR 

XLUCl 

FOUND BUSY LU 

LU63 

CONTINUE 

YLUN-XLUN 

ALL DONE 

IXLU5 

LU6CTR 

LU6 

LU6PT 

6 

EXIT 

LDA f I 
LU6LL 
5 

. GET LIST LOCATION 

L.D A 1 1 
LU6LL+l,a 

GET PARAMETERS 


N7901067 
N7901068 
N790 1069 
N7901 070 
N7901071 
N79Q1072 
N7901073 
N7901074 
* ^ ^ N790 1075 

N7901076 

N7901077 

N7901078 

N7901079 

N7901Q80 

N7901081 

N7901Q82 

NT901Q83 

N79fliaSA 

N79S1085 

N79Q1O60 

N7901087 

N79C1Q86 

N798i089 

N7901090 

N790ia91 

N7901092 

N7901093 

N790109A 

N79Q1095 

N79Q1096 

N7901Q97 

N7901098 

N7901099 
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'w' 

110 0 

P0441 

0143 



110 1 

PD442 

ODFE 



1102 

Pfl 443 

C81E 


o 

1103 
110 4 

PQ444 

18F9 



110 5 

P0 445 

0 A08 

LU65? 


1106 

PO 446 

510F 


O : 

1107 

P0447 

C81S 


1108 

P0448 

5103 



11Q9 

1110 

P0 44 9 

4135 


o 

1110 

P044A 

0A41 


1110 

PD 448 

QC41 



1110 

PG44C 

5100 



1110 

P044D 

00 07 


o 

1110 

1111 

P044E 

00 04 



1111 

P044F 

0 AlO 



1111 

P0450 

flC32 


o 

1111 

1112 

P0451 

5105 



1112 

P0 45 2 

OAID 



1112 

P0453 

0C43 


o 

1112 

1113 

P0454 

5105 



1114 

P0455 

C80B 



1115 

P0466 

0904 


o 

1116 

P0457 

5101 


1117 

P0458 

0135 



1118 

PS459 

3A0B 



1119 

1120 

P045A 

510F 



1120 

P0 458 

0A08 



1120 

P045C 

0C61 



1120 

P0 45O 

5105 


o 

1121 

P045E 

18D3 

LU66 

1122 





1123 

P045F 

0 0 01 

LUeCFR 


1124 

P0460 

0000 

LUbPT 

o 

1125 
112 6 

P0461 

0 0 07 



o 


o 

o 

o 

o 


SQZ LU652 DONE 

INQ -1 
LDA^' LU6LL 
JHP» LU651 

ENA LUM7N-XLUN OUTPUT MESSAGE 

RTJ- GMS ,T 

LDA» LU6CTR 

RTJ- CON, I 

STO- LUM9\/l,r 

CONSTR 7,LU6LL,LUM9V2,XLU,3 ■ 


LISTIT LUH9 


LISTIT LUMA 


LOA» LU6PT SEE IF BUSY 

INA k 
RTJ- L0A,I 

SAM LU66 IDLE 

ENA LUMZN-XIUN 
RTJ- GMS, I 

LISTIT LUMB NOT IDLE 


JH'P* LU61 

NUM 1 
NUM 0 

BZS LU6LL^7) 


1128 P0468 0018 


BZS XLUFIL( SEGSIZ-=*^‘i-XLU’) 


N790 110 0 
N7901101 
N7901102 
N7901103 
N7901104 
N79Q11D5 
N79011G6 
N790 1107 
N79Q1108 
N79011D9 
N7901110 


N7901111 


N79Q1112 


N7901113 

N7991114 

N7901115 

N7901116 

N7901117 

N7901118 

N79aill9 

N7901120 


N7901121 

N7901122 

N7901123 

N790112A 

N7901125 

N7901126 


N7901126 


□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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1130 


» 


N79Q113D 

1131 



LOGICAL UNIT ANALYSIS PART Y 

N7901131 

1132 


» 


N7901132 

1133 



STRTSG YLU 

N79D1133 

1133 

0 A80 

P 



1133 

0 0 DC 




1133 

04E0 

■P 



1133 

04E1 

P 



1133 

04E2 

P 



1133 

0 4E3 

P 



1133 

04E4 

P 



1133 

04E5 

P 



1133 

04E6 

P 



1133 

PQ 48 0 00 00 





1135 






if a- 

^LOGICAL UNIT THREADS * * 



* N79Q1135 

1136 

P0481 

0 8 42 


LU7 

CLR 

Q 




N79D1136 

1137 

PO 482 

CO 00 

X 


LDA 

=XL0G2 




N7901137 


P0483 

0 3 72 

X 








1138 

P0484 

8846 



ADO» 

LU7CTR 




N7901138 

1139 

P0485 

5101 


LU71 

RTJ- 

LDA, I 

GET THREAD 



N79Q1139 

1140 

P0486 

6A 45 



SIA^ 

LU7TH,Q 

SAVE ELEMENT 



N7901140 

1141 

P0487 

012C 



SAP 

LU73 




N7901141 

1142 

PO 488 

0900 



INA 

D 




N7901142 

1143 

P0489 

OllA 



SAN 

LU73 

NOT END 



N79Dil43 

1144 

PQ48A 

0157 



SQN 

LU721 

END 



N7901144 

1145 

PD48B 

C83F 


LU712 

LOA^ 

LU7CTR 

NO ENTRIES 



N790il45 

1146 

P048C 

9857 



sm* 

YLUCl 




M7901146 

1147 

P048O 

0 132 



SAM 

LU72 

CONTINUE 



N7901i47 

1148 

P048E 

OCDl 



ENQ 

ZLUN-YLUN 

EXIT 



N7901148 

1149 

Pfl 48F 

ICFQ 



JMP» 

(YLU) 




N79G 1149 

1150 










N790115I] 

1151 

PO 490 

D33A 


LU72 

RAO* 

LU7CTR 




N79Q1151 

1152 

PO 491 

1 8EF 



JMF* 

LU7 




N7901152 

1153 

P049? 

QOOi 


LU721 

INQ 

i 

END FOUND 



N79Q1153 

1154 

P0493 

18 07 



JHP* 

LU7 41 




N790 1154 

1155 










N7901155 

1156 

P0494 

0DF8 


LU73 

INQ 

-7 




N7901156 

1157 

P0495 

0163 



SQP 

LU74 

©LIFFER FULL 



N7901157 

1158 

P0496 

ODOB 



INQ 

8 

GET NEXT ELEMENT 



N79Q1158 

1159 

P0497 

0902 


. LU731 

INA 

2 

GET THREAD ADDRESS 



N7901159 

1160 

P0 498 

18 EC 



JHP* 

LUFl 




N 79 01160 

1161 




■» 






N7901161 

1162 

P0499 

DC 08 


LU74 

ENQ 

8 




N7901162 

1163 

P049A 

480E 


LU741 

STO* 

LU7TP 

SAVE NUN OF ELEMENTS THIS TIME 



N7901163 

1164 

PO 49B 

OA09 



ENA 

LUHYN-YLUN 

BUFFER OUTPUT 



N7901164 

1165 

P049C 

510F 



RTJ” 

GMS^I 




N79Q1165 

1166 

P049D 

G836 



LDA* 

LU7NE1 

NUM OF ELEMENT 



N7901166 

116 7 

P049E 

0116 



SAN 

LU743 




N7901167 
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O 

O 

O 

O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 


1168 P049F C82B 

1169 POAAti 5103 

1170 POAAl 4154 

1171 

1171 P04A2 OA07 
1171 P04A3 0C51 

1171 P04A4 5105 

1172 

1173 P04A5 0A4B 

1174 P04A6 0C5A 

1175 P04A7 510D 

1176 P04A8 0000 

1177 P04A9 0002 

1178 

1178 P04AA 0A17 
1178 P04AB 0C59 

1178 P04AC 5105 

1179 

1180 P04AD C826 

1181 P04AE 88F9 

1182 P04AF 6824 

1183 P0480 C9BF 

1184 P04B1 Q12D 

1185 

118 6 P0 4B2 C8F5 

1187 P0433 09F7 

1188 P0484 0103 

1189 P0435 0842 

1190 P04B6 431D 

1191 P04B7 18D3 

1192 

1193 P04B8 C81A 

1194 P04B9 0122 

1195 P04BA 0900 

1196 P048B 0102 

1197 P04BC 0842 
1196 P04BD 18D9 

1199 P04BE 18F6 

1200 

1201 P048F 0A0£ 

1202 PQ4C0 5111 

1203 P04C1 DAOA 

1204 PQ4C2 51CF 

1205 P04C3 C8Q7 

1206 P04C4 5103 

1207 P04C5 4119 
120 8 

1208 PC4C6 OAOE 
1208 P04C7 0C16 

1208 PC4C8 5105 

1209 P04C9 18EB 

1210 

1211 PG4CA 0001 


LDA'» LU7CTR 
RTJ- CON, I 
STQ- LUMCyi, I 
LISTIT LUHC 


LU743 ENA LU7TH-YLU 
ENQ LUMDH 
RTJ- CNS,I 
LU7TP NUH 0 
HUM 2 
LISTIT LUMn 





LDA» 

LU7NEL 


ADD# 

LU7TP 


STA» 

LU7NEL 


INA 

-S40 


SAP 

LU75 


LDA- 

LU7TP 


INA 

-8 


SAZ 

LU7 45 

LU744 

CLR 

Q 


STQ^ 

LU7NEL 


JMF* 

LU712 

LU743 

LDA^ 

LU7TH+7 


SAP 

LU7451 


INA 

0 


SAZ 

LU745 

LU7451 

CLR 

Q 


JMP» 

LU731 

LU745 

JMP^ 

LU744 

LU7 5 

ENA 

LLUM2 


RTJ- 

MOP, I 


ENA 

LUMZN-YL 


RTJ- 

GMS, I 


LDA'*- 

LU7CTR 


RTJ- 

CON, I 


STQ- 

LUMEVl,! 


LISTIT LUME 


JMP» 

LU744 




LU7CTR NUM 1 


OATEi 08/19/99 


OUTPUT HEADER 


FROfI 


TIMES 

SPACES BETWEEN 


TOTAL NUH OF ELEMENTS 

TOO MANY 

CHECK IF DONE 

NO END YET 
END FOUND 
INITIALIZE 

GET LAST THREAD 
CHECK LAST ENTRY 
FOR END OF THREAD 


LOOK FOR MORE LOGICAL UNITS 


TOO MANY ON THREAD 


N7901168 

N7g01169 

N7901170 

N7901171 


N79Q1172 

N7901173 


N7901174 


N7901175 


N7901176 


N7901177 


N7901178 


56^1075 
56^1075 
56'»^1C75 
5 6'»1075 

56»1075 


N79Q1179 
N790118C 
N79G1181 
N79G1182 
N7901183 
N7901184 
N7901185 
N7901186 
N79Q1187 
N7901188 
N7901189 
N7901190 
N7901191 
N790 1192 


N7901193 
N7g01194 
N7901195 
N7901196 
N7901197 
N79Q1198 
N7901199 
N790 1200 
N79G1201 
N7901202 
N79ai203 
N79Q1204 
N79012G5 
N790120 6 
N790120 7 



o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


START LU 1 


N79D1209 

N7901210 

N7901211 




J 
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1Z12 P04CB 0008 BZS UJ7TH(8) 

1213 P04O3 0000 LU7NEL NUM 0 

O 

r\ 1215 P04D4 OOOC BZS YLUFILf SEGSIZ-»+Y'LU ) 


o 


o 

o 

o 

O 

O 


O 


O 

O 


O 

O 

o 


N79Q1212 

N7901213 

o 

N7901215 Q 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATES 08/19/99 


1217 




1218 




1219 




1220 




1220 

04E0 

P 


1220 

00 OD 



1220 

05 40 

P 


1220 

0 5 41 

P 


1220 

0 5 42 

P 


1220 

0 5 43 

P 


1220 

0 5 44 

P 


122 0 

0 5 45 

P 


1220 

0 5 46 

P 


1220 

PQ4E0 OODD 




LOGICAL UNIT ANALYSIS PART Z 
SIRTSG ZLU 


N7901217 
N7901218 
N7901219 
N7901 220 


1222 







1223 

P04E1 

C 0 0 0 

X 

LU8 

LDA 

=XCOMPRQ 


PD4E2 

7FFF 

X 




1224 

P0 4E3 

5101 



RTJ- 

LDA, I 

1225 

P0 4E4 

681D 



STA^ 

LUSTP^l 

1226 

P04E5 

GOOD 

X 


LDA 

= XFNR 


P04E6 

7FFF 

X 




122 7 

P04E7 

5101 



RTJ- 

LDA, I 

1228 

P04E8 

6818 



Sf A^ 

LU8TP 

1229 

PQ4E9 

0A09 



ENA 

LUMZN-ZLUN 

1230 

P04EA 

510F 



RTJ- 

GMS,I 

1231 

PQ4EB 

C815 



LOA'*- 

LU8TP 

1232 

P04EG 

580G 



RTJ» 

LU80UI 

1233 

P04EO 

GOOD 



LDA 

= AGM 


P04EE 

434D 





1234 

P 0 4E F 

612G 



STA- 

LUMFVl, I 

1235 

P04F0 

C811 



LDA» 

LUSTP^H 

1236 

P04F1 

5807 



RT J »• 

LU80UT 

1237 

P04F2 

0C05 



ENQ 

LLUM1-LLUM2 

1238 

P04F3 

484E 



STQ» 

ZLUIFG 

1239 

P0 4F4 

0 8 42 



CLR 

Q 

1240 

P04F5 

4840 



STQ’^ 

ZLUMFG 

1241 

P04F6 

OCFB 



ENQ 

LUN-ZLUN 

1242 

1243 

PG4F7 

1CE8 



JMP* 

IZLU) 

1244 

P04F3 

GCOO 


LU30UT 

MUM 

0 

1245 

P04F9 

5103 



RTJ- 

GONtI 
LUMFV2, I 

1246 

P0 4FA 

6130 



STA- 

1247 

P04FB 

4131 



STQ- 

LUMFV2fHiI 

1248 





LISTIT LUMP 

1248 

P0 4FC 

0 AOC 





1248 

P04FD 

0C25 





1248 

P04FE 

5105 





1249 

P04FF 

1CF8 



JMP» 

(LU80UT J 


» ^LAST DRIVER TO USE FNR AND CMR 

GET BLOCK 
GO OUTPUT FNR 

GO OUTPUT CMR 
GO TO DO AUTOLOAD 


N79Q1222 

N7901223 

N7901224 

N7901225 

N79D1226 

N7901227 
N7901228 
N7901229 
N7901230 
N79Q1231 
■ N79D1232 

N7901233 

N7901234 

N7901235 

N7901236 

N79D1237 

N7901238 

N7901239 

N7901240 

N7901241 

N7901242 

N7901243 

N7901244 

N7901245 

N7901246 

N7901247 

N7901248 


N7901249 



1250 

1251 

1252 
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DATES 08/19/99 


P0500 

PC501 

OCflO 
0 0 0 0 

LU8TP NUM 0»0 


N790125D 

N7901251 

N7901252 


1254 PD502 C03E 


BZS ZLUFIUSEGSIZ-^ + ZLU) 


N7901254 
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DATEJ 08/19/99 


C; 

O 

o 


1256 



1257 



1258 



1259 

1259 

0 5 4Q 


1259 

0540 

P 

1259 

DOOE 



INTERRUPT TRAP MESSAGES PARI X 
STRMSG ITMX 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


1261 


1261 


0G16 


1261 


0540 

P 

1261 

P0540 

OD 01 


1261 

P0541 

2A2A 



P0542 

2A-49 



P0543 

4E54 



PD544 

4552 



PD545 

5255 



PI)546 

5054 



P0 547 

2 0 54 



PD548 

5241 



P0549 

5020 



P054A 

4552 



P0 54B 

524F 



P054C 

5220 


1261 


OGOC 


1262 




1262 


0016 


1262 

PC54D 

2 0 49 



P0 54E 

4E49 



P054F 

5449 



P0550 

414C 



P0551 

4C59 


1262 


0011 


1263 




1263 


0 028 


1263 


0552 

P 

1263 

P0552 

0 0 01 


1263 

P0 553 

4C49 



P0554 

4E45 



PC555 

2020 


1263 


D02C 


1263 

P0556 

3Q30 



P0557 

2 0 52 



P0558 

4553 



P0559 

504F 



P055A 

4E53 



P0558 

4520 



PD55C 

4953 



P055O 

2055 



P0 55E 

4E50 



MESSAG ITMX, ITM2,1,*^'^^INTERRUPT TRAP ERROR*, 0 


ADDMES ITM2,ITM1,* INITIALLY* 


MESSAG ITHX,IIM3,1, *LINE »,1,*00 RESPONSE IS UNPATCH£0*,0 


n 


I 


N7901256 

N7901257 

N79Q1258 

N7901259 


N7901261 


N790 1262 


N7901263 


□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


C02ND 
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OATES Oa/19/99 


C) 


o 


PG55F 

41 54 



P0560 

4348 



P0561 

4544 

o 

1263 

1264 


OOOF 


1264 


0038 


1264 


0562 P 

o 

1264 

PC562 

0 0 01 

1264 

PD563 

4C4q 


P0564 

4E45 



P0565 

2030 

o 


P0566 

2049 


P0567 

5320 



P0568 

4E4F 



PC569 

5420 

o 


P056A 

5345 


P056B 

5455 



P056C 

5020 



P056D 

46 4F 



P056E 

5220 

o 


PO 56F 

5 0 41 



P057D 

5249 



P0571 

5459 

o 


P0572 

2F50 


P0573 

524F 



P0574 

5445 



PO 575 

4354 

o ^ 

1264 

1265 


0013 


1265 


flO 4C 


1265 


0576 P 

o 

1265 

P0576 

0001 

1265 

P0577 

4C49 


PQ578 

4E45 



PQ579 

2820 

o 

1265 


0 0 50 

1265 

P057A 

3030 



P057B 

2 0 4C 



P057C 

4153 

o 


P057D 

5420 


PO 57E 

49 4E 



P057F 

5445 



P0580 

5252 

o 


PQ581 

5550 


P0582 

5445 



P0583 

4420 


1265 


D0 5A 

o 

1265 

P0584 

3132 

P0585 

3334 

o 

1265 

1266 
1266 


OOOF 
0 0 4C 

1266 

P0586 

2028 


P0587 

49 4E 


o 


MESSAG ITHX,ITM4,i,-LI^3E 0 IS NOT SETUP FOR PARITY/PROTECT % 0 N7901264 


MESSAG ITHX.IfH6,l,*LINE %1,»00 LAST INTERRUPTED *,15*1234* ,0 N7901265 


ADDMES ITM6,IfM5,* i INVALID)' 


N7901266 


( 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


c 

C02MD PAGE hk DATE! 08^19/99 


o 

PD588 5641 
P0589 4C49 
PD58A 4429 



O 

o 

1266 0014 

1267 P058B 0015 

BZS ITMXFL{SEGSIZ-^+ITMX> 

N7901267 

O 

o 




o 

o 




o 

o 




o 

o 




o 

o 




o 

o 




: o 

o 




: 

o 




o 

o 




o 

o 




o 

o 




o 

o 




o 

o 




o 





■ o 


( ,) 
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DATES 08/19/99 


0 

1269 

1270 

1271 

1272 

Sf- 



N7901269 



INTERRUPT TRAP MESSAGES 

PART Y 

N7901270 

N79D1271 

0 

C5A0 

STRMSG ITMY 


N7901272 

1272 


1272 

Q5A0 P 





1272 

OOOF 





o 


C j 


□ 


o 


o 


o 

o 


o 


o 

o 

o 

© 

o 

o 

o 

o 

o 


1274 

1274 


0016 

1274 


05AO P 

1274 

PQ5A0 

0 0 01 

1274 

P05A1 

2A2A 


PO 5A2 

2 A 49 


P05A3 

4E54 


PQ5A4 

4552 


P05A5 

5255 


P05A6 

5 0 54 


P05A7 

2 0 54 


P05A8 

52 41 


P05A9 

5020 


P35AA 

4 55 2 


PC5A8 

524F 


P05AC 

5220 

1274 


GOOD 

1275 

1275 


0016 

1275 

POSAD 

2 0 49 


P0 5AE 

4E49 


P05AF 

5449 


P05BG 

414C 


P0 5B1 

4C59 

1275 


0011 

127 6 

1277 

1278 

1278 


0028 

1278 


0 5 B2 P 

1278 

PD5B2 

0 0 02 

1276 

PO 563 

4C49 


PQ5B4 

4E45 


P05B5 

2020 

1278 


0 0 2C 

127 8 

P05B6 

3020 


P05B7 

312 0 


P05B8 

3220 


P05B9 

3320 


P05BA 

342 0 


P05BB 

3520 


P05BC 

3620 


MESSAG ITHY, YITH,1,»^»^INTERRUPT TRAP ERROR*,D 


A DOMES YITM, YITO,» INITIALLY' 


MESSAG ITMY, ITM.7,2 » ‘LINE 
MESSAG *012745678 
MESSAG *012345678 


9 ’ a’ 5 ,C 0 F F SRLEVEL 
9 A B C D £ F*,0 


’ ,1» 


N79D1274 


N79Q1275 


N79D1276 

N7901277 

N7901278 


O 

o 

o 


o 


o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


C02ND 


PAGE 


46 


date: 08/19/99 


r' 


O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 




P05BD 

3720 



PC5BE 

3820 



P05BF 

3920 



P05C0 

4120 



P05C1 

4220 



P05C2 

43 2 0 



P05C3 

4420 



P0 5C4 

4520 



P05C5 

462 0 



P05C6 

2 0 00 



P05C7 

4C45 



P05C8 

5645 



P05C9 

4C2 0 

127 

8 


Ofl 40 

127 

8 

P05CA 

30 2 0 



P05CB 

3120 



P05GC 

32 2 0 



P05CD 

332 0 



P05CE 

3420 



P05CF 

3520 



P0500 

3620 



P05D1 

3720 



P05D2 

3320 



PQ5D3 

3920 



PO 5D4 

4120 



PO 5 D5 

4220 



P05D6 

4320 



P05D7 

4420 



P05D8 

4520 



P05D9 

4620 

127 

3 


0 0 27 

127 

9 



128 

0 



126 

Q 


00 50 

128 

0 


05DA P 

128 

0 

PS5DA 

0001 

128 

8 

P05DB 

4C45 



P05DG 

5645 



P05DD 

4C2Q 

128 

0 


0 0 54 

126 

0 

P0 5OE 

3132 



P050F 

2 0 49 



PQ5E0 

5320 



P05E1 

5553 



P05E2 

45i-4 



P05E3 

2 0 46 



P05E4 

4F52 



P05E5 

2049 



P05E6 

4E54 



P05E7 

4552 



P0 5E8 

5255 



P05E9 

5054 



P05EA 

5320 



P05EB 

41 4E 


MESSAG ITMY, ITM8 ,1 , 'LEVEL ' , 1» * 12 IS USED FOR INTERRUPTS AND SI* 
MESSAG *IS RESERVED FOR FORTRANSO 


N79Q1279 

N79ai280 


O 

O 

O 

O 

o 

o 

O 

O 

o 

o 

o 

o 

o 

o 


o 


o 


o 
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date: 08/19/99 



P05EC 

4420 



1280 


0 0 63 



1280 

POSED 

4953 




P05EE 

2052 




P05EF 

4553 




PD5F0 

4552 




PO 5F1 

5645 




P05F2 

4420 




P05F3 

464F 




P05F4 

5220 




P05F5 

464F 




P05F6 

52 54 




P05F7 

5241 




P05F8 

4E2D 



1280 

1281 

PQ5F9 

0 0 IE 
0 0 07 

BZS ITRYFL (SEGSIZ-^J-ITMY) 

N7901281 
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date; 08/19/99 




1283 




123 4 


■if- 


1285 



o • 

1286 

1286 

0600 



128 6 

060 0 

F 


1286 

0010 



o ■ 


INTERRUPT TRAP HESSAGES PART Z 
STRMSG ITMZ 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


1288 



1288 


0016 

1288 


06 00 P 

1268 

P0600 

0 0 01 

1288 

PG601 

2A2A 


P0602 

2 A 49 


P0603 

4E54 


PG604 

4552 


PQ60 5 

5255 


P0606 

5054 


P06C7 

20 54 


P0608 

5241 


P0609 

5020 


P06G A 

4552 


P0608 

524F 


P06 0C 

5220 

1288 


DCOC 

1289 



1289 


0016 

1269 

P060D 

2 0 49 


PQ6DE 

4E49 


P060F 

5449 


P0610 

41 4C 


P0611 

4C59 

1239 


00 11 

1290 



1291 



1291 


0 028 

1291 


0612 P 


1291 P0612 0001 
1291 P0613 464F 
P0614 5254 
P0615 5241 
P0616 4E20 
P0617 4CD45 
P0618 5645 
PQ619 4C53 
P061A 2000 
1291 0031 

1291 P061B 2020 
P061C 2020 
P061D 2020 


MESSAG ITHZ,ZITM,1 ,"»-»^INTERRUPT TRAP ERROR 


A'DOMES ZITHfZITO,* INITIALLY* 


MESSAG ITM Z, I T HA, 1,* FORTRAN LEVELS 

MESSAG * %0 



Cj 

N7901283 

N7901284 

N79G1235 

N7901286 Q 

O 

o 

,0 N79D1288 

o 

o 

o 

o 

N7901289 

O 

o 

N7901290 

N7901291 

O 

O 

O 

O 

O 


O 


u 



C02ND 

o 


P061E 

20 20 



F0 61F 

2020 



P0620 

2020 

o 


PQ621 

2020 


P0622 

2020 



PQ623 

2020 



P0624 

2020 

o 


P0625 

2020 


P0626 

2020 



Ptl627 

2020 



PQ628 

2020 

o 


P0629 

2020 

1291 

1292 

P062A 

2020 

0018 


o 

1292 


0 028 

1292 

P062B 

2845 



PD62C 

5252 



PO 62 D 

4F52 

o 


P062E 

2920 

1292 


OOlC 


129 3 


0 0 45 


1294 

P062F 

3020 

o 


PQ630 

3120 


P0631 

3220 



P0632 

33 20 



PQ633 

3420 

o 


PQ634 

3520 


P0635 

3620 



P0636 

3720 



P0637 

3820 

o 


P0638 

3920 


P0639 

4120 



P063A 

4220 



P063B 

43 20 

o 


P063C 

4420 


P063D 

4520 



P063E 

4520 


1295 



o 

1296 

1296 


GO 55 


1296 


Q63F P 


1296 

P063F 

0 0 01 

o 

1296 

P0640 

53 59 

P0641 

5354 



P0642 

45 4D 



PO 693 

20 55 

o 


PD644 

5349 


P0645 

4E47 



P0646 

2 0 4E 



Pfl 647 

4449 

o 


P0648 

5350 


P0 649 

20 57 



P064A 

4954 


o 


PAGE 49 


AODHES ITMA, ITM9i MERROR)* 


EQU ITH9TBr^-ITMZ+SEGC0R) 
ALE .,0123456789 


date: 08/19/99 


F . 


FORTRAN f ERROR) *,0 


ABODE 


HESSAG 

MESSAG 


ITMZ,ITM8,1, ^ 

«!sY9TEM USING NDISP WITH REENT 


N7901292 


N7901293 

N7901294 


N7901295 

N7901296 


O 

O 

o 

o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


. . r'i 

PAGE 50 DATEt 08/19/99 

o 
^ o 
o 
o 

BZS ITMZFL tSEGSIZ-»+ITHZJ N7901297 


o 

o 

o 

o 

o 

o 

o 

• o 

o 

. o 

o 

; O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 




f ■) 

C02ND 


o 


P064B 

4820 



P06AC 

5245 



P064D 

454E 



P064E 

5420 

LJ 


P06i»F 

464F 



P0650 

52 54 



P0651 

5241 



P0652 

4E20 

u 


P0653 

2845 



P0654 

5252 



P0655 

4F52 

o, 


P 0 656 

2920 


1296 


0017 


1297 

P0657 

00 09 


o 


o 


date: 08/19/99 


C02ND 
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1299 


130 0 

V- 

1301 

1302 


1302 

0660 

1302 

0 660 P 

1302 

aoii 


o 


INTERRUPT STACK HESSAGES PART X 
STRHSG ISMX 


N7901299 

N79013Q0 

N79013Q1 

N7901302 


o 

o 


o 

o 

o 

o 


o 

o 

o 

o 

o 

o 

o 


1304 



1304 


0 016 

1304 


0660 P 

13G4 

P0660 

0 0 01 

1304 

P0661 

2A2A 


P0662 

2A4D 


P0 663 

4153 


P0664 

4B20 


P0665 

5441 


P0666 

4 2 4'C 


P06&7 

4520 


P0668 

4552 


P0669 

52 4F 


P066A 

5220 

1304 


aooA 

1305 



1305 


0016 

1305 

P066B 

20 49 


P0 66C 

4E49 


P066D 

5449 


P066E 

41 4C 


P066F 

4C59 

1305 


0 0 OF 

130 6 



1307 



130 7 


0 026 

13D7 


0670 P 

1307 

P067D 

0 0 01 

1307 

PO 671 

4C49 


P0672 

4E45 


P0673 

2020 

13Q 7 


002A 

1307 

PQ674 

3132 


PD675 

20 49 


P0676 

532 0 


P0677 

53 45 


P0678 

5420 


PD679 

464F 


P067A 

5220 


P067B 

hC56 


P067C 

4C2 0 


MESSAG ISHX, ISM2 ,1 TABLE ERROR* »0 


AODHES ISH2,ISM1,» INITIALLY* 


MfSSAG 

MESSAG 


ISHX, ISM3,1 ,*LINE 
•123A BUT ISABLE 


*,1^*12 IS SET FOR LVL 
TO INTERRUPT *,1,*1234' 


I.! 


N79Q1304 


N79G13Q5 


N792 1306 
N7901307 


O 

O 

O 

o 

o 


o 

o 

o 

o 

o 

o 


o 


o 


o 


o 
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date; 

08/19/99 


K-r.« 

o 

1307 


0033 





o 


130 7 

P067D 

3132 








P067E 

3334 






o 


PQ67F 

2042 





o 


PQ680 

5554 







P0681 

2020 








P0682 

4953 






o 


P0683 

4142 





o 


Pi3684 

4C45 







P0685 

2 0 54 








P0686 

4F20 






o 


P0687 

494E 





o 


P0688 

5445 







P0689 

5252 








P068A 

5 5 50 






o 

1307 

P068B 

5420 
0 0 42 





o 

o 

13D7 

1307 

1308 

P068C 

P0680 

3132 

3334 

OOID 

0038 

EQU ISH3VR1ISH3V2+50 

IS UN 

WORD 

N79013D8 

o 


1309 



HESSAG ISHX,ISH4t2, •ENTRY 

FOR LyL 

•,1,*1234 INITIALLY •*1, 

N79G 1309 



131 0 



HESSAG "1234 CHAMGEQ TO % 

It '1234' 


N790131G 


o 

1310 

1310 


0 0 44 
0 6 8F P 





o 


1310 068€ 

131 0 P068E Q 0 C2 
1310 P0&8F 


o 


P0690 

5452 

: O 


P0691 

5920 



P0692 

464F 




PQ693 

5220 


o 


P0694 

4C 56 

' O 

1310 

P0695 

4C20 
Q0 4C 




1310 

P0696 

3132 


: 0 


P0697 

3 3 34 

: ^ 


P0698 

2 0 49 



P 0 699 

4E49 




P069A 

54 49 


o 


P069B 

414C 

; O 


P069C 

4C59 

1 


PO 69 D 

2020 


1 

1310 


0 054 


^ o 

1310 

PO 69E 

3132 

o 


PD69F 

3334 



P06A0 

2 043 




P06A1 

4641 


o 


P06A2 

4E47 

o 


PG6A3 

4544 



P06A4 

2054 




P06A5 

4F20 


o 

1310 

1310 

P06A6 

0 0 5C 
3132 

' o 



P06A7 

3334 


o 




o 

o 




■ o 


{ :■ 
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DATES 08/19/99 


1310 

0019 



N7901311 

1311 

P06A6 0018 

BZS ISMXFL( SEGSIZ-’^ + ISMXl 



o 

o 

o 

o 

o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 


V..' 

o 

o 

o 

o 

o 

o 

C) 

o 

o 

o 

o 

o 

o 

o 

o 


o 


C02ND 
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DATE: Oe/19/99 



L.} 

1313 



1314 


o 

131 5 
1316 

V- 

1316 

Q6C0 


1316 

06CO P 

o 

1316 

D012 


O 

1318 

1318 


0016 



1318 


fl6C0 

P 

O 

1313 

P06C0 

GO 01 


1318 

PC6C1 

2A2A 




P06C2 

2A4D 




Pa6C3 

4153 


o 


P0 6C4 

4B2D 



P06C5 

5441 




PQ6C6 

424C 




P0 6C7 

4520 


o 


PQ6C8 

4552 



P06C9 

524F 




PQ6CA 

5220 



1318 


00 OA 


o • 

1319 

1319 


0016 



1319 

PG6C8 

2049 




PD6CC 

4E49 


o 


P06CO 

5449 



P06CE 

41 4C 




P0 6CF 

4C59 



1319 


OQQF 


o 

1 32 0 
1321 
1321 


8 0 26 



1321 


06D0 

P 

o 

1321 

PD60Q 

0 0 01 


1321 

P06D1 

494E 




P06D2 

5452 




P0 6D3 

50 54 


o ^ 


F06D4 

2 0 53 



P06O5 

5441 




P06D6 

43 4 B 




P0607 

20 4C 


o 


P06D8 

4556 



P05O9 

454C 




P06DA 

0D20 



1321 


0031 


o 

1321 

P06OB 

2020 



P06OC 

20 20 




P0600 

2020 


o 






o 


INTEP.RUPT STACK MESSAGES PART Y 
STRMSG ISMY 


MESSAG ISHY* YISH, 1 TABLE ERROR%Q 


ADDHES YISM,YISO,» INITIALLY' 


MESSAG ISMY, ISM5,1,«’INTR'PT STACK LEVELiR',!, 
MESSAG • 'SO 


N79Q1313 

N7901314 

M7901315 

N79D1316 


M79Q1316 


N7901319 


N790132D 

N7901321 


□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATES 08/19/99 


o 


o 


P06DE 

2020 



PG6DF 

2020 



P06-E0 

2020 



P06E1 

2020 

‘:J 


PO 6E2 

2020 



P06E3 

2020 



P06E4 

2020 

o 


P0&E5 

2020 


P06E6 

2020 



P06E7 

2020 



PC6E8 

2020 

o 


P06E9 

2020 

1321 

P05EA 

2020 

OOIA 



1322 


0 0 42 

o 

1323 

P06EB 

2D31 

P05FC 

2030 



P06ED 

2031 



P06EE 

2032 

o 


P06EF 

2 0 33 


P06FO 

2034 



P06F1 

2035 



P06F2 

2036 

o 


P0 6F3 

2037 


PO 6F4 

2 0 3-8 



P06F5 

2039 



P06F6 

2041 



PO 6F7 

2042 



POEFS 

2 0 43 



P06F9 

2044 



P06FA 

2 0 45 

o 


P06FB 

2 0 46 

132A 

P06FC 

0024 


o 


o 

o 

o 

o 

o 


EQU 


ALF 


ISM5TB!»+1-ISHY+SEGC0R) 
.,-1 fll23A56739 


ABODE 


F. 


BZS ISMYFLtSEGSIZ-->ISMY5 


o 


N7901322 

N7901323 


N790132A 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


! ) 








o 




C02ND 


PAGE 56 DATES 08/19/99 



o 

1326 






N79Q1326 

o 


1327 



K- 

LU CAPABILITY MESSAGES PART X 

N7901327 


o 

1328 

1329 
1329 


0720 


STRMSG 

UCMX 

N7901328 

N79Q1329 

■ o 


1329 


0720 

P 






1329 


0 013 






o 








o 

o 

1331 

1331 


0016 


HESS AG 

UCMX,UCH2»1 ,"^^-LCGICAL UNIT CAPABILITY ERROR»-,0 

N7901331 

o 


1331 


0720 

P 





o 

1331 

PQ720 

0 0 01 





o 

1331 

P0721 

2A2A 







P0722 

2 A AC 







PD723 

AF47 






o 


P0724 

4943 





. o 


P0725 

41 4C 







P0726 

2055 








P0727 

4E49 






o 


P Q 72 8 

5420 







P0729 

43 41 





o 



P072A 

50 41 








P07 2B 

4249 






o 


P072C 

4C49 





o 


P072D 

5459 







PC72E 

2 0 45 








P072F 

5252 






o 


P0730 

4F52 





o 

1331 


ODIO 






1332 

1332 


0016 


ADDMES 

UCM2,UCMlt» INITIALLY' 

N7901332 


o 

1332 

PC 731 

2 0 49 





o 

1332 
133 3 

1333 
1333 

P0732 

P0733 

P073it 

P0735 

4E49 

5449 

414C 

4C59 

0015 

0 0 2C 
0736 

P 

MESSAG 

UCMX, UGM3 ,1 ,* S%1,*BI IS NOT A *,1^*READ DEVICE*, 0 

N7901333 

o 

o 



o 

o 

1333 

P0 736 

00 01 






133 3 

P0737 

2053 







1333 


0 0 2E 






o 

1333 

PQ738 

4249 





o 


P0739 

20 49 







P073A 

53 2 0 








P0738 

4E4F 






o 


P073C 

5420 





o 


P0730 

4120 





o 








o 

o 








o 
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DATE; 08/19/99 


1333 


0 034 

1333 

PG73E 

5245 


P073F 

41 44 


PQ740 

2044 


P0741 

4556 


P0742 

4943 


P0743 

4520 

1333 


OOOD 

1334 


C D3A 

1335 

P0744 

4249 


P0745 

424F 


P0746 

4C4F 


P0747 

434F 

133 6 
133 7 

P0748 

4349 

1337 


003F 

133 7 


0749 P 

1337 

P0749 

0 0 01 

1337 

P074A 

4C55 


PD748 

2 0 20 

133 7 


0 0 42 

1337 

P074C 

3132 


P074D 

2 0 49 


P074E 

5320 


P074F 

41 4C 


P0750 

5445 


P0751 

52 4E 


P0752 

4154 


P0753 

4520 


P0754 

464F 


P0755 

5220 

1337 


0 0 4C 

1337 

P0756 

3132 


P0757 

2C20 


P0758 

4255 


P0759 

5420 


P075A 

4841 


P0756 

5320 


P075G 

4C45 


P075D 

5353 


P075E 

20 43 


P075F 

4150 


PQ760 

4142 


P0761 

494C 


PD762 

4954 


P0763 

5920 

1337 


flOlA 

1338 

P0764 

0 0 1C 


EQU UCM3TBI ^-UCMX + SEGCOR-) 
ALF . ,8IB0L0C0CI. 


MESSAG UC-'iX,UCH4,l,'LU SI, '12 IS ALTERNATE FOR ',1, 
MESSAG '12, BUT HAS LESS CA PA 8IL ITY ' , 0 


N7901334 

N7901335 


N7901336 

N7901337 


BZS UCHXFLf SEGSIZ-«‘*^UCMX^ 


N7901338 


r"'! 





C02ND 

PAGE 58 DATES 08/19/99 



o 

1340 





N790134D 

O 


1341 

134? 




LOGICAL UNIT MESSAGES PART X 

N7901341 

N7901342 


o 

1343 




STRMSG LUMX 

N7901343 

O 

1343 

1343 

1343 


0780 
0780 
0 014 

P 




O 

o 






O ' 

1345 

1345 


0016 


MESSAG LUMX, LUH2U »*^’^LOGICAL UNIT TABLE ERROR® , 0 

N7901345 

O 


1345 


0 7 80 

P 



O 

o 

1345 

PB780 

0 0 01 




1345 

P0781 

2A2A 






P0 782 

2A4C 







P0783 

4F47 




o 

o 


P0784 

4943 






P0785 

414C 







P0786 

2 0 55 







P.0787 

4-F49 




o 

o 


PQ788 

5420 





P0789 

5441 







PB78A 

424C 







PB788 

4520 




o 

o 


P078C 

4552 





P078D 

524F 






P0 78E 

5220 





o 

1345 

1346 


0 0 OF. 


ADOMES LUM2,LUM1,® INITIALLY* 

N79Q1346 

■ o 

13^6 


S016 





1346 

PB78F 

2049 







P0790 

4E49 




; O 

o 


P0791 

5449 





PQ792 

41 4C 






PQ793 

4C59 





o 

1346 

1347 


0 013 


MESSAG LUMX,LUM3,1 ,*NUM OF LUS DO NOT AGREE, ASSUME »,1,'*12*,Q 

N7901347 

o 

1347 


0 02A 






1347 


0794 

P 





1347 

P0794 

D301 




o 

o 

1347 

P0795 

4F55 





P0796 

4020 






P0797 

4F46 







P0796 

2 0 4C 




o 

o 


P0 799 

5553 





P079A 

20 44 






P079B 

4F20 







PD79C 

4E4F 




o 

o 


P079D 

5420 





PQ79E 

4147 






P079F 

5245 






C) 


C02ND 
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DATE! 08/19/99 


O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


P07AQ 

P07A1 

P07A2 

P07A3 

P07A4 

P07A5 


P07A6 
P07A7 
P07A8 
PG7A9 
P07AA 
P07AB 
PD7AC 
P07AD 
PQ 7AE 
P07AF 
P07B0 
P07B1 
P07B2 


PO 7B3 
P07B4 
P07B5 
P07B6 
PD7B7 
P07B8 
P0 7B9 
P07BA 
P07BB 
PQ7BC 
P07BD 
PQ7BE 
P07BF 

P07G0 


P07C1 

P07C2 

P07C3 

P0 7C4 
P07C5 
P07C6 


f^ESSAG LUMX,LUM4,1,*LU 1 NOT CORE ALLOCATOR’^D 


MESSAG LUMX, LUH5,1 ,*N0 VALID PHYSTB FOR LU »,1,*12S0 


MESSAG LUHX,LUN6,2f“tU WAS MARKED COWN%0 


N79Q1348 


N790i349 


N79Q135fl 


C..-’ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 
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DATE; 08/19/99 


P07C7 204D 
P07C8 4152 
P07C9 4845 
P07CA 4420 
PD7C8 444F 
P07CC 574E 

1350 DOOB 

1351 P07CD 0013 


o 


o 


o 


o 


o 


o 


o 


n 


o 


o 


o 


o 


BZS LUMXFL(SEGSIZ-^+LUMX’) 


O 


N7901 351 


O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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o 

1353 

1354 




LOGICAL UNIT MESSAGES PART 

Y 

N7901353 

N79D1354 

N7901355 

O 

o 

13 55 
1356 
1356 


07E0 

STRMSG LUHY 


N7901356 

O 



1356 


0 7E0 

P 





o 

1356 


0015 





o 

o 

1358 

1358 


0016 


MESSAG LUHY, YLUM,1,»^»’"L0GICAL 

UNIT TA ELE 

ERROR', 0 _ N7901358 

o 


1358 


07E0 

P 




o 

o 

1358 

P07E0 

0 0 01 





1358 

P07E1 

2A2A 








P0 7E2 

2A4C 








P07E3 

4F47 





o 

o 


P07E4 

4943 






P07E5 

41 4C 








P0 7E6 

20 55 








P0 7E7 

4E49 





o 



PQ7E8 

5420 





o 


P07E9 

5441 








PG7EA 

42 4C 








P07E8 

4520 





o 

o 


PD7EC 

4552 






P07ED 

524F 








P0 7.ee 

5220 






o 

1358 

1359 


aooE 


A DOMES YLUM,YLUOf* INITIALL'Y' 


N79D1359 

o 

1359 


0016 







13 59 

PG7EF 

2 0 49 








PQ7F0 

4E49 





o 

o 


PQ7F1 

5 4h9 






P07F2 

41 4C 






o 

1359 

1360 

P07F3 

4C59 
00 13 


MESSAG LUHY,LUM7,1,*LU *,1,*12 

IS SHARED 

BUT UNHATGHiES', 0 N790136Q 

o 

1360 


0 02A 







1360 


G7F4 

P 






1360 

P07F4 

0 0 01 





o 

o 

1360 

P07F5 

4C55 





P07F6 

2020 







1360 


DO 2D 







1360 

P07F7 

3132 





o 

o 

P07F8 

2049 






P07F9 

5320 








P07FA 

5348 








PG7FB 

41 52 





■ o 

o 


PD7FC 

4544 






P07FO 

2 0 42 








P0 7FE 

5554 







C) 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


C02ND 



P07FF 

2055 



P080D 

4E4D 



P0801 

4154 



P0802 

4348 



P0803 

4544 


1360 


OOOF 


1361 




1362 




1362 


G0 3A 


1362 


0804 

P 

1362 

Pt)804 

0 0 01 


1362 

P0805 

4C55 



PQ806 

2020 


1362 


003D 


1362 

PQ 807 

3132 



PG8 08 

20 41 



P0809 

4E44 



P08QA 

2020 


1362 


0 0 41 


1362 

P080B 

3132 



P080C 

204D 



P080D 

4154 



P08QE 

4348 



P080F 

2 0 42 



P0810 

55 54 



P0811 

2 0 53 



P0812 

4841 



P0813 

5245 



P0814 

4420 



P0815 

4249 



PC816 

5420 



P0817 

4E4F 



P0818 

5420 



P0819 

5345 



P081A 

5420 


1362 


0016 


1363 




1363 


00 51 


1363 


081B 

P 

1363 

P081B 

0002 


1363 

P081C 

4C55 



P0810 

2020 


1363 


0 0 54 


1363 

P081E 

3132 


P081F 

2054 



P0820 

48 52 



P0821 

4541 



P0822 

4420 


1363 


0 0 07 


1364 




1365 




1365 


0 059 


1365 


0 823 

P 


P/\GE 62 


DATEJ 06/19/99 


MESSAG LUMY ,LUM8 »,1,»12 AND *,lt 

HESSAG *12 MATCH BUT SHARED BIT NOT S£T»,0 


MESSAG LUMY, LUMC,2 ,'LU Si, 'IE THREADED 


MESSAG L'JMY,LUMD,2» 
MESSAG * 


o 

o 

' o 

N7901361 

N7901362 , Q 

o 

o 

o 

o 

o 

o 

N7901363 : O 

o 

o 

o 

N790136A 
SO N7901365 

O 

o 

o 
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DATE! Oa/19/99 


1365 P0823 D0C2 

1365 F0824 2020 
P0825 2020 
P0826 2020 
PQ827 2020 
PQ828 2020 
PD829 2020 
P082A 2020 
P082B 2020 
P082C 2020 
P082D 2020 
P082E 2020 
PQ82F 2020 
P0830 2020 
P0831 2020 
P0832 2020 
PG833 2Q20 
P0834 2020 
P0835 2020 
P0836 2020 
P0837 2020 
P0838 2020 
PQ839 2020 
P083A 2020 

1365 0017 

1356 PD83B 0005 8ZS LUMYFL ISEGSIZ N7901366 
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DATE': 08/19/99 


o 

136 8 





N79Q1368 

O 


1369 




LOGICAL UNIT MESSAGES PART Z 

N7901369 



1370 





N7901370 


o 

1371 

1371 


0 8 40 


STRHSG LUMZ 

N7901371 

o 


1371 


0 8 40 

P 





1371 


0 016 





o 







o 

o 

1373 

1373 

1373 


0016 

Q840 

P 

MESSAG LUMZ,LUHF,i ,"'LU %1,“'12 THREAD MAY BE BROKEN'tO 

N7901373 

o 

o 

1373 

P084Q 

0 0 01 




o 

1373 

PC841 

4C55 






P0842 

2020 






1373 


0019 





o 

1373 

P0843 

3132 




o 


P0844 

2 0 54 






P0845 

48 52 







P0846 

4541 







P3847 

4420 




o 

o 


P0848 

4D41 






P0849 

5920 







P084A 

4245 





o 


P084B 

P084C 

2 0 42 
524F 




o 



P084O 

4845 







P084E 

4E20 





o 

1373 

1374 


QQOE 


MESSAG LUHZ, LUMP, 2, 'RETURN FOR %1,'FNR WAS » , 1 » ' 123 4» , 0 

N79Q1374 

o 


1374 


0025 






1374 


0 6 4F 

P 




o 

1374 

P084F 

0 0 02 




o 

1374 

P0850 

5245 






PQ851 

5455 







P0852 

52 4E 





o 


P0853 

2 0 46 




o 


P0854 

4F52 






P0855 

2020 






1374 


0 0 2C 





o 

1374 

P0856 

464E 




o 


P0 857 

5220 






P0858 

5741 







P0859 

5320 





o 

1374 


0030 




o 

1374 

P085A 

3132 






PQ85B 

33 34 






1374 


0 0 DC 





o 

1375 

1375 


0032 


MESSAG LUM2,LUM9,2 ,*1U »»1, '12 CURRENT PARA LIST Af' SI, '1234S0 

N7901375 

o 

o 







o 

o 







o 



— 

— 

— 

— 

1 

1 

1 

i 

1 

1 

1 

1 

1 

! 

i 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

i 

1 

1 

1 

1 

1 

1 

1 

! 

1 

! 

i 

1 

! 

1 

i 

i 

1 

1 

! 

i 

1 

1 

1 

1 

1 
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DATE 


08/19/99 


1375 


0 8 5C 

P 

137 5 

P0 85C 

0 0 02 


1375 

P085D 

4C55 



P085E 

2020 


1375 


0 0 35 


1375 

PQ85F 

3132 



P0860 

20 43 



P0861 

5552 



P0862 

5245 



P0863 

4E54 



P0864 

2050 



P0365 

4152 



PQ866 

412 0 



P0867 

4C49 



P0868 

5354 



P0 869 

20 41 



P086A 

5420 


1375 


00 41 


1375 

P086B 

3132 



P086C 

3334 


1375 


QQIO 


1376 




1377 




1377 


0043 


1377 


086D 

P 

1377 

PO 86D 

00 02 


137 7 

P086E 

52 43 



P086F' 

2020 


1377 


0 0 46 


1377 

P0870 

4A4A 



P0871 

i»A4A 



P0872 

2 0 00 



P0873 

4320 



P0874 

2020 



P0875 

4B4B 



P0876 

4B4B 



P0877 

200D 



P087S 

5448 



PQ879 

2020 



P087A 

4C4C 



P087B 

4C4C 



PC87C 

20DD 


1377 


0 0 53 


1377 

P087D 

4C55 



P087E 

2020 



P087F 

40 40 



PG880 

40 4’D 



PC831 

20 OD 



P0882 

4E2Q 



PG883 

2020 



PD884 

4E4E 



P0885 

4E4E 



P0886 

20 QD 



PC887 

5320 



MESSAG LUMZ,LUMA^2, *RC »,1,»J.JJJ J RC KKKK ’ !RTH 
MESSAG 'LU MHMH JRN NNNN' JRS 0000^0 


LLLL SR’,! 5 


N7901 376 
N79B1377 
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date: 08/19/99 


o 




P0888 

2D20 - 



PQ889 

4F4F 



P088A 

4F4F 

o ■ 

137 7 
1378 


OOID 


1378 


0061 


1378 


0 8 88 P 

o ■ 

1378 

P088B 

0 0 02 

1378 

P088C 

492F 



P088D 

4F20 



P088E 

49 4E 

o 


P088F 

20 50 


P0890 

52 4F 



PG891 

4752 



P0892 

4553 

o 


P0893 

5320 

1378 


0008 


1379 

P0894 

flOOC 

o 




o 





MESSAG LUMZ,LUM0,2, »I/0 IN PROGRESS’ ,0 


8ZS LUM7FL( SEGSIZ-^+lUMZ1 


o 

o 

o 

o 

o 

o 

o 

o 

o 


1382 



1383 


NEXT SEGHENF 

1384 



1385 

0017 

EQU N£XTN(*‘/SEGSIZ-SYSSEG/SEGSIZ1 

1386 


END 

PGM = 

08A0 ^ 22081 

COM = 000 0 ( 0'} DAT =' OOOO t 


N7901378 


N79Q1379 


N7901382 

N7901383 

N7901384 

N7901385 

N79Q1386 


□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

C) 

o 

o 

o 

o 

o 
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DATE 


08/ 19/99 


EQUIVALENCES 


DEF.LINE 

NAME 

VALUE 


REFERENCED AT 

LINE 1 

NUMBER 













0 00 0 

I 

COFF 

(000255? 

















0 08 A 

SEGSIZ 

0G60 

10 Q0096J 

0098, 

0 098, 

.0098, 

QQ98, 

0098, 

9098, 

0098,. 

0 098, 

0098, 

0180, 

0185, 

018 5, 

0185, 

0185, 

0185, 

0185 





0 185 , 

018 5, 

0185, 

0249, 

0254, 

0254, 

0254, 

0254, 

0254, 

0254, 

0254, 

0254, 

0254, 

0327, 

0 332 , 

0 332 





0332, 

G 332, 

0332, 

0332, 

0 332, 

0332, 

C332, 

0 437, 

0442, 

0442, 

0442, 

0 442, 

0 442, 

0 442, 

0 442 , 

0 442 





0 442, 

0 531, 

0 536, 

0536, 

0536, 

0536, 

0536, 

0 53 6, 

0536, 

0536, 

0536, 

0595, 

0600, 

0600, 

0600, 

0600 





0600 , 

0 600, 

0600, 

06QD, 

0 60 0 , 

0668, 

0673, 

0673, 

0673, 

0 673, 

0673, 

0 673, 

0673, 

0 673, 

0673, 

0 749 





0754, 

Q 754, 

0 754, 

0 754, 

0754, 

0 754, 

0 754, 

0754, 

0754, 

0855, 

0860, 

0860, 

0860, 

0860, 

0860 , 

0860 





0860 , 

0860 , 

0860, 

0 958, 

0963, 

0963, 

0963, 

Q963, 

0963, 

0963, 

0963, 

0963, 

0963, 

1060, 

1065, 

106^ 





10 65, 

1065, 

1065, 

1065, 

1069, 

1G65, 

1065, 

1128, 

1133, 

1133, 

1133, 

1133, 

1133, 

1133, 

1133 , 

1133 





1133, 

1215, 

1220 , 

1220, 

1220 , 

1220, 

122Q, 

1220, 

1220, 

1220, 

1220, 

1254, 

1259, 

1259, 

1267, 

1272 





12 72, 

1 28 1 , 

128 6, 

1286, 

1297, 

1 30 2, 

1302, 

1311, 

1316, 

1315, 

1324, 

1329, 

1329, 

1338, 

1343, 

1343 





1351 , 

1356, 

1356, 

1366, 

1371, 

1371, 

1379, 

1385, 

1385 








0 087 

SEGCOR 

001 6 

(OQ0022J 

1261, 

1263, 

1263, 

1264, 

1265, 

126 5, 

1265, 

1274, 

1278, 

1278, 

1278, 

1280, 

1280, 

1280, 

1283, 

1291 





1291, 

1293, 

1296, 

1304, 

1307, 

1307, 

1307, 

1307, 

1310, 

1 310, 

1310, 

1310, 

1318, 

1 321 , 

l32i. 

1322 





1331, 

1333, 

1333, 

1333,. 

1334, 

133 7, 

1337, 

1337, 

1345, 

1347, 

1347, 

1348, 

1349, 

1349, 

1350, 

1350 





1 358 , 

1 36 0, 

1369, 

1362, 

1362, 

1362, 

1363, 

1363, 

1365, 

1373, 

1373, 

1374, 

1374, 

1374, 

1375, 

1375 





1375, 

1377, 

1377, 

1377, 

1378 












0 0 88 

LDA 

0001 

(000031? 

0113, 

0161, 

0165, 

0196, 

0263, 

0303, 

0458, 

0 468, 

0 583, 

0604, 

0609, 

0626, 

0685, 

0687, 

0689, 

0 766 





0 7 70 , 

0810, 

0812, 

0875, 

0879, 

0 893, 

0 896, 

0901, 

0913, 

0930 , 

0939, 

0976, 

0998, 

1040, 

1049, 

1078 





1081, 

10 9 4, 

1098, 

1116, 

1139, 

1224, 

1227 










0 088 

CON 

000 3 

1000003) 

0137, 

0222, 

0374, 

0519, 

0800 , 

0 803, 

0 685, 

0918, 

0988, 

1021, 

1029, 

1108, 

1169, 

1206, 

1245 


0088 

LST 

0005 

10000051 

0139, 

0172, 

0240 , 

0293, 

0378, 

0 420, 

0431, 

0 52 4, 

0575, 

0656, 

0 730, 

0605, 

0 887, 

0907, 

G92C , 

0990 





1025, 

1111, 

1112, 

1120, 

1171, 

117 8, 

1208, 

1248 









0 088 

ATA 

OOOB 

TQOOGll) 

0102, 

0259, 

0447, 

0 550, 

-Q677, 

0 75 8, 

0864, 

0 967 









0088 

CNS 

0000 . 

(000013) 

0 521, 

0574, 

1110, 

1175 













0 0 88 

GMS 

aOOF--: 

(000015) 

O'l 33 , 

0169, 

O 2 O 5 , 

0 277, 

0 361, 

0388, 

0515, 

0570, 

0639, 

0717, 

0796, 

0952, 

0986, 

1017, 

1106 , 

1119 





1165, 

1'20 4, 

1230 














0089 

MOP 

0011 

{ 00S017) 

0 135, 

0171, 

0 230, 

0377, 

0 413, 

0430 , 

D517, 

0719, 

0 798, 

0 954, 

1019, 

1202 





0 098 

ITN 

OQQ 0 

(OOOOQO) 

0132, 

0168, 

0175, 

0347 













018 5 

Wir N 

OGOl 

( 000001) 

0 175, 

0 204, 

0 243 














0 25 4 

XITN 

00 0 2 

( 0000!} 2) 

0243, 

D27F, 

0298, 

0300 













8332 . 

YITN 

000 3 , 

(0000031 

0 3 Q 0 , 

0347, 

0 356, 

0 360 , 

0387 












0 442 

ISN 

0004 

( 000004) 

0298, 

0356, 

0500, 

0514, 

0661 












0536 

XISN 

003 5 

(0B0005) 

0 5 DO , 

0 544, 

0565, 

0569 













060 0 

YISN 

0-00 6 

( 0 00 00 6) 

0 5 65, 

0 63 8, 

0661 














0 673 

UCN 

000 7 

(000007) 

8544, 

0 713, 

0 716, 

0648 













0 73 8 

R 

0001 

( 0 00001) 

0 738, 

0 740, 

0742, 

0743, 

Q743, 

0 744, 

0744, 

0745, 

0 745, 

0745, 

0745, 

G. 745 , 

0 747, 

0832, 

0 834 , 

0835 





0835, 

0 836, 

0 836, 

0837, 

0 83 7, 

0 837, 

0 837 , 

0837, 

0 839 









o 

o 


o 


o 

o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 
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68 



073 8 

W 

0002 

(000002) 

0738, 

0 740, 

0741,. 





0834, 

0834, 

0834, 

Q 738 

B 

0003. 

( 000003) 

0 740, 

0740, 

0740 , 





0 7 43, 

0 743., 

0 743, 





0 746, 

0747, 

0 747, 





0834, 

0834 , 

0834, 





0 8 3 8, 

0838, 

0838, 

0 754 

WUCN 

000 8 

(000008) 

0713, 

0795, 

0848, 

0860 

LUN 

000 9 

(000009) 

0852, 

0 927, 

0 9.51, 

0963 

WLUN 

QOOA 

(000010) 

0927, 

0985, 

1013, 

1065 

XLUN 

OOOB 

(QOOOll) 

1013, 

1073, 

1087, 

1133 

7LUN 

oooc 

C 000012) 

1087, 

1148, 

1164, 

1 22D 

ZLUN 

OOOD. 

(000013) 

1148 , 

1229, 

1241 

1259 

SITMX , 

0540 . 

(001344) 




1259 

IFMXN 

QQQ’E 

(000014) 

0132, 

0168, 

0204 

1 261 

ITM2 

001 6 

1 000022) 

1262 



1 261 

LITM2 

OOOC 

(000012) 

0134, 

0170, 

0229, 

1262 

ITMl 

0016 

(000.022) 




1262 

ilTMl 

0011 

(000017) 

0 345 



1 263 

I?H3 

0028 

(0000401 

0139 



1263 

TTH3V1 

0B2C : 

( 000044) 

0138 



1263 

LI¥M3 

OOOF ■ 

(000015) 

0139 



12 64 

ITM4 

00.3 8 . 

(000056) 

Q172 



1264 

LITH4 . 

0013 . 

(000019) 

0172 



1265 

ITH6 

004C 

(000076) 

0 232, 

0239, 

0 240, 

1265 

IFH6V1 . 

0050 

(000080) 

0212, 

0213 


1265 

ITM6V2 

005A 

(000098) 

0223, 

0224 


1265 

LTTM6 

OOOF 

( O0Q015) 

0240 



1266 

ITM5 

004C . 

(000076) 




1266 

LITM5 .. 

D014 

{ 0D0020) 

0 233 



1272 

SITMY 

05A0 . 

(001440) 




1272 

ITMYN . 

OOOF 

( 0 00015) 

0 2 76, 

0 36 0,. 


1274 

YITM 

0016 .- 

I 000022) 

1275 



1274 ^ 

LYITM 

OOOC 

(000012) 




1275 

YIT 0 . 

0016 

(0000221 




1275 

LfITO , 

0011 ■. 

( 000017) 




1278 

ITM7 

0028 . , 

(000040) 

0 292, 

0 293 


1278 

ITM7V1 : 

0G2C . 

(000044) 

0.282 



1278 

ITH7V2 

0040 ' 

( 000064) 

0284 



1278 

LIFM7 

CQ27 

(.000039) 

0293 



1 280 

TTM8 

0050 , 

(000080) 

0378 



1 280 

ITH8V1 

005 4 

I 0 00084) 

0 375 



1 280 

ITH8¥2 

0063 

(000099) 




1280 

LITM6 . 

OOiE,. ^ 

( 000030) 

8378 



128 6 

SITMZ 

0600 

(001536) 




1266 

r THZN 

0010 ' 

(090016) 

0387 



1288 

ZlfM 

0016 ^ 

(000022) 

1289 



1288 

LZITH 

OOOC 

( 0DQ012) 




1289 

ZITO 

0016 

(OGQ022) 




1289 

LZITO 

0011 

(000017) 




1 291 

ITHA 

0028 

C 000040) 

0416, 

0 419, 

0420 , 

1 291 

ITMAVl- 

0031 

(000049) 

0403 



1 291 

LITHA 

0018 

(000024) 

0420 




DATES 

08/19/99 






0742, 

0742, 

0742, 

0743, 

0 744, 

0 744, 

0746, 

0746, 

0835, 

0 83 6 , 

0 83 6, 

0838, 

0838, 

0838, 

0839, 

0 83 9 

0740, 

0 74 0 , 

Q740, 

0741, 

0741, 

0741, 

0741, 

D741, 

0743, 

0 743, 

0 744, 

0744, 

0744, 

0 744, 

0 745, 

0 745, 

0747, 

0 832, 

0832, 

0832, 

0832, 

0832, 

0832, 

0833, 

0834, 

0835, 

0 835, 

0835, 

0835, 

0835, 

0836, 

0836, 

0838, 

0838, 

0839, 

0839, 

0 83 9 




0852 








1241 








1016 








1105, 

1118 







1203 








0345,. 

Q376, 

0-412, 

0429 






1266 


1292 


0 746 , 

0747 , 

0 747 , 

0832 , 

0833 

0741 , 

0742 , 

0742 , 

0742 , 

0742 

0745 , 

0746 , 

0746 , 

0746 , 

0 746 

08 33 , 

0833 , 

0 833 , 

0 833 , 

0833 

0836 , 

0836 , 

0837 , 

0837 , 

0837 


o 


c 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


o 


o 


r“:. 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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1292 

ITM9 

0028 

(000040) 



1292 

LITM9 

OOlC 

1000028) 

0 414 


1 293 

ITM9T8 

0045 

( DGOQ69) 

0 401 


1296 

ITMB 

0055 

(000085) 

0-431 


1296 

LITMB 

0017 

(000023) 

0 431 


1 302 

SISMX 

G660 

( 001632) 



1302 

I S H XN 

0011 

(000017) 

0514, 

0 569 

1304 

ISM2 

0016 

(000022) 

1305 


1304 

LISM2 

000 A . 

(0000103 

0 516, 

0659 

1305 

ISMl 

0016 

(0000223 



1305 

LISMl 

ODOF 

( 000015) 

0659 


1307 

ISM3 

0026 

1 G00Q38) 

0 524 


130 7 

ISM3V1 

002A , 

(000042) 

0520 


130 7 

ISM3V2 

0033 

C 000051) 

0521, 

13 0 8 

1307 

ISH3V3 

C042 

{000066) 



130 7 

LISH3 

OOID 

( QQ0029) 

0524 


1308 

ISM3VR 

0038 

( 0000563 

0523 


1 310 

ISH4 

0Q44 

(000068) 

0573, 

0575 

1 310 

ISM4yl 

004C 

(000076) 

0 574 


1 olD 

ISM4V2 

0054 

( OOflO.84) 



1310 

ISM4V3 

Q0 5C 

(000092) 



1 310 

LISM4 

0019 

(000025) 
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0 7 80 , 

0799 



0832 

UC2DCT 

0349 

0820 





0842 

UC2 9 

8351 

0 776 



o 

o 

0850 

UC299 

. 0359 

0 845 



0 855 

WUCFIL 

035D 




0860, 0860, 0860, 0860, 0928, 0958 


0860 

LU 

036 0 

0860, 

0860, 

0860, D86Q., 


0 860 

LUOP 

0 3C0 




o 

o 

0 860 

LUIFG 

53C1 

0862 



C860 

LUHFG 

03C2 



0883, 0922 


0860 

LUCl 

03C3 

0 876, 

D 880, 



0 860 

LUC 2 

Q3C4 




o 

o 

0 860 

LUC3 

03C5 




0 860 

LUC4 

03C6 




o 







o 

o 







o 
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DATES 08/19/99 

0 

o 

0 874 

LUl 

036G 

0863 



0 


0 875 

LU121 

■036E 

' 0865 




0879 

LU131 

0373 

0866 




o 

0 8se 

LU19 

0376 

- 08 77 



0 

0 891 

LU2 

037E 

-.0881, 

0 911 



0893 

LU21 

0381 

0 867 



0896 

LU22 

0384 

0868 




o 

0901 

LU23 

038A 

0869 



0 

09D6 

LU28 

Q38F 

0898 




0910 

LU3 

0393 

0905, 

0 92 5 



a 913 

LU31 

0396 

0870 




o 

0916 

LU38 

0399 

0933, 

0943 


0 

0921 

LU36 

03AG 

0945 



0927 

LU39 

03A5 - 

0923 




0 929 

LU33 

03A7 

0915, 

0 937 



o 

0 930 

LU331 

03A8 

0871 



0 

0 934 

LU332 

03AC 

0932 




0935 

L U 333 

Q.3AD 





0 938 

LU34 

03BO 

0934 




o 

0945 

LU35 

03B6 

0942 



: 

0947 

LU3CTR 

03B7 

0912, 

0 917, 

0921, 0924 


0 948 

LU3TAD 

03B8 

0914, 

0 936, 

0 938 



0950 

LUIER . 

0389 

0 8 82, 

0906, 

0916, 0955 


o 

0 95 8 

LUFIL - 

038F 



0 

0963 

WLU 

O3C0 

0963, 

0963, 

0963, 0963, 0963, 0963, 0963, 0963, 1014, 1060 


0963 

WLUOP 

0420 





0 9 63 

WLUIFG 

0 421 

0 965 




o 

0963 

WLUMFG ■ 

0422 




0 

0 963 

WLUCl . 

0423 

3.980 , 

1004, 

1042 


0963 

WLUC2 

0424 



0963 

WLUC3 

• 0425 





o 

0963 

WLUC4 

0426 




0 

0974 

LU4 

03C9 

0966, 

0 98.3, 

0 996 


0 979 

LU41 

03CF 

0991 



0 985 

LU42 

D3D4 

3 978 




o 

0995 

LU4CTR 

Q3DD 

0975, 

0979, 

0982, 0987 

• 0 

0 996 

LU5 

030F 

0 971, 

0981, 

1007 


0 998 

LU51 

03EC 

0968 


1003 

LU52 

03E5 

toil. 

1026 



o 

1009 

LU53 

S3EA 

1900 


0 

1013 

LU599 

03ED 

1005 




1015 

LU57 

03EF 

1 002 , 

1010 



102 5 

LU571 

G3F9 

1033 




o 

1028 

LU58 

03FD 

10 23 



0 

1037 

LU5HAT 

0403 

1001, 

1009, 

1055 


1038 

LU5ML1 

04G 4 

10 47 




10 40 

LU5M1 

0407 

0969 




o 

10 43 

LU5M2 

a 40 A 

1054 



0 

1049 

LU5M3 

Q40F 

0970 




1052 

LU5H4 

0 412 

10 45 




1055 

LU5MEX 

0415 

1051, 

1053 



o 

1057 

LU5LTP 

0416 

10 15, 

1022, 

10 41, 10 50 

0 

1058 

LU5CTR 

0417 

0997, 

1003, 

1006, 1020, 1039, 1043 

o 







0 

o 







0 


u 


C02ND 


o 

1060 

WlUFIL 

0418 


1065 

XLU 

0420 


1065 

XLUOP 

0 48 0 

o 

1065 

XLUIFG 

0481 

1065 

XLUMFG 

0482 


1065 

XLUCl 

0 483 


1065 

XLUC2 

0 48 4 

o 

1065 

XLUC3 

0485 

1065 

XLUC4 

0486 


1076 

LU6 

0 42 9 


1084 

LU61 

0 432 

o 

1089 

LU63 

0 43 7 

1092 

. LU65 

. 0439 


1097 

IU651 ■ 

0 43E 


110 5 

UJ652 

0445 

o 

1121 

LU66 

0 45E 

1123 

LU6CTR 

045F 


1124 

LU6PT 

0460 


1125 

LU6LL 

0 461 

o 

1128 

XLUFIL 

0468 

1133 

XLU 

048 0 


1133 

XLUOP 

04E0 


1133 

XLUIFG 

Q4E1 

o 

1133 

XLUMFG'. 

04£2 

1133 

XLUCl 

0hF3 


1133 

XLUC2 

0 4E4 


1133 

XLUC3 

0 4E 5 

o 

1133 

XLUC4 

04€6 

1136 

LU7 

0 481 


1139 

LU71 

048 5 


114 5 

LU712 

348B 

o . 

1151 

LU72 

0490 

1153 

LU721 . 

0492 


1156 

LU73 

0494 


1159 

LU731 

0497 

o 

1162 

LU74 

0499 

1163 

LU741 

.,049A 


1173 

LU743 . 

04A5 


1176 

LU7TP 

. 04A8 

o 

1189 

LU74H 

04B5 

1193 

■ LU7 45 

.0468 


1197 

LU7451 

G4BG 


1199 

LU746 

^ 04BF 

o 

1 201 

LU75 

04BF 

1 211 

LU7CTR 

04CA 


1212 

LU7TH 

04C8^ 


1213 

LU7NFL 

04D3 

o 

1215 

XLUFIL 

0404 

1220 ^ 

ZLU 

04E0 


1 220 

ZLUOP 

0540 


122D 

ZLUIFG 

0541 

o 

1 220 

ZLUMFG 

D542 

1 220 

ZLUCl 

0 543 
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date: 

08/ 19/99 

10 65, 

1065, 

1065, 1065, 

1065, 1065, 1065, 1065, 1074, 1088, 1110, 1128 

1067, 

1071 



1072 




1070 , 

1085 




1107 

1133, 1133, 1133, 1133, 1149, 1173, 1215 


1068 
1121 
1086 
1083 
1103 
IICO 
1117 
1077 
10 79 
1095 


1090 


, 10 82, 1084, 1089, 
, 1092, 1114 
, 1099, 1102, 1110 


1133, 1133, 1133, 1133, 


1146 


1152 
1163 
1191 
1147 . 

1144 

1141, 1143 
1198 
1157 
1154 . 

1167 

1163, 1181, 1186 
1199, 1209 
1188 
1194 
1196 
1184 , 

1138, 1145, 1151, 
114G, 1173, 1193 
1166, 1180, 1182, 


1168, 1205 
1 190 


1220 , 1220 , 1220 , 1220 ,,- 1220 , 1220 , 


1220, 122C, 


1242, 


1254 


1238 

1240 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


o 


o 


o 
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DATES 08/19/99 


D 

1220 

ZLUC2 

0 544 


1 220 

ZLUC3 

0545 


1 220 

ZLUC4 

0546 

O 

1223 

LU8 

04E1 

1244 

LU80UT 

04F8 


1251 

LU8TP 

050 0 


1254 

ZLUFIL 

0 502 

o . 

1259 

ITHX 

0540 


1261 

SITM2 

0540 


1263 

SITM3 

0552 


1264 

SITM4 

0562 

O 

1265 

SITM6 

0576 

1267 

ITMXFL 

. 0588 


1272 

ITMY 

OSAO 


1274 

SYITM , 

05AD 

o 

1278 

SITM7 

0 5B2 

1 280 

SITM8 

05DA 


1281 

ITMYFL 

. Q5F9 


1286 

ITHZ 

8600 


1288 

SZITH . 

■0600 


1291 

SITMA 

-.0 612 


1296 

SITMB 

• 063F 


1297 

ITHZFL 

0657 

o 

13C2 

ISMX 

. 0660 

1304 

SISH2 

0 66 0 


1307 

SISM3 ■ 

0670 


1 310 

SIS'M4 

068E 

o : 

1311 

ISMXFL 

06A-8 

1316 

ISHY 

06C0 


131 8 

SYISM 

. 06C0 


1321 

SISH5 

06D0 

O 

1324 

ISM'YFL 

06FC 

1329 

UCMX 

0720 


1 331 

SUCM2 

0720 


1333 

SUCH3 

-0736 

O 

133 7 

SUCM4 

0749 

1338 

UCHXFL 

0764 


1343 

LUMX 

0780 


1345 

SLUH2 

0780 

o 

1347 

SLUM3 

0794 

1348 

S1.UM4 

07A6 


1349 

SUJM5 

0783 


1350 

SLUM6 

07C1 

o 

1351 

LUMXFL 

07cn 

1356 

LUMY 

07E0 


1358 

SYLUM 

Q7E0 


1 360 

SLUM? 

- 07F4 

o 

1 362 

SLUM8 • 

. 0804 

1363 

SLUMG _ 

^ 0816 


1365 

SLUMD 

0823 


1366 

LUMYFL 

083B 

o 

1371 

LUMZ 

0840 

1373 

SLUME 

0840 


1232, 

1225, 

1236, 

1228, 

12h9 

1231, 

1235 



1261, 

1261, 

1263 

1264 
1265, 

1263 , 
1262 

1265 

1263 , 

1264, 

1265, 

1265, 

1274, 

1274, 

1278 

1280 

1278, 

1275 

1278, 

127 8,, 

1280, 

1280, 

12 88, 
1288, 
1291, 
1296 

1291, 

1289 

1292 

1291, 

1293, 

1296, 

1297 

130 4, 
13D4, 
1307 
1310 

1307, 

1305 

1307, 

1307, 

1307-, 

1310, 

1318, 

1318, 

1321 

1321, 

1319 

1321, 

1322, 

1324 


1331, 

1331, 

1333 

1337 

1333, 
1 33 2 

1333, 

1333, 

1334, 

133 7, 

1345, 

1345, 

1347 

1348 

1349 

1350 

134 7, 
1346 

1347, 

1348, 

1349 , 

1349, 

1358, 

1358, 

1360 

1362 

1363 
1365 

1360, 

1359 

1360, 

1362, 

1362, 

1362 , 

1373, 

1373 

1373, 

137U, 

1374, 

1374, 

1375, 


o 


o 


1265, 1267 
1280, 1281 

1310, 1310, 1310, 1311 

1337, 1337, 1338 
1350, 1350, 1351 

1363, 1363, 1365, 1366 

1375, 1375, 1377, 1377, 1377, 1378, 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

1379 Q 

o 


o 
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DATE-: 08/19/99 


O 



1374 

SLUMP 

08hF. 

1374 

1375 

SLUM9 

085C- 

1375 

1377 - 

SLUMA 

D86D 

1377 

1378 

SLUMB 

088 B 

1378 

1379 

LUMZFL 

0894 



O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

c 

o 

o 

o 

o 


C02ND 


PAGE 80 


DATE: 08/19/99 


EX TERNALS 


DEF .LINE 

NAME 

VALUE 

REFERENCED AT 

0092 

INyiNT 

0030 

0149 

0092 

FHASK 

0 0 E8 

0295 

0092 

NDISP 

0171 

0 426 

0 092 

MASK! 

0210 

0456, 0581 

0 092 

INTSTK 

0 28 0 

0 6 64 

0093 

LOGIA 

D42A 

0686, 0765, 

0 Q93 

LOGl 

03-CA 

0768, 0874, 

0 093 

L0G2 

0483 

0878, 1137 

0093 

ICO RE 

0386 

0 8 97 

0 093 

GOHPRQ 

D4E2 

1223 

0093 

FNR 

04E6 

1226 


u iiNc:. iMuiT cur\ 


0891, 103'S, 
0974 


1076 


o 
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DATES 08/19/99 


i 

ft L 

P H A 

0 E T I 

CAL 

SORT 

0 F 

o 

ATA 

0088 

B 

0738 

CMS 

0 088 

ICO RE 

0093 

INTSTK 

0 092 

INyiNT 

0092 


IS131 

0 464 

IS14 

0468 

IS15 

0 472 


IS17 

0 492 

IS179 

05D0 

IS18 

0 538 


ISILV 

0529 

ISITP 

0 451 

IS2 

.0 549 

u 

IS2BUF 

0591 

IS2CTR 

0590 . 

IS2GT 

0 579 


IS3 

0603 

IS31 

0618 

IS311 

0 613 


IS 3 9 

0657 

IS3FLG 

0663 

IS3TB 

0 666 

o : 

ISFIL 

0551 

ISTFG 

0 442 

I SHI 

1305 

ISH4 

1310 

ISM4V1 

1310 

ISM4V2 

1310 


ISMXFL 

1311 

ISMXN 

1302 

ISMY 

1316 


ITlfll 

0110 

IT102 

0113 . 

- IT 11 

S121 


IT17 

015 4 

IT18 

0148 

..IT19 

0175 

u 

IT3 

0189 

IT31 

0193 

IT311 

0194 


IT341 

0 222 

IT35 

■ 0235 

IT351 

0 239 


IT412 

0268 

IT42 

0276 

IT43 

0279 

o 

IT52 

0 30 2 

IT521 

0 3,03 

IT523 

Q3D7 

IT56 

0 372 

IT59 

0 371 

IT5CTR 

0 324 


IT66 

0 412 

IT67 

0 416 

IT68 

0 420 


ITC2 

0098 

ITC3 

0 098 

ITC4 

0098 


ITM4 

1264 

ITM5 

1266 

ITH6 

12 65 

U 

ITHBVl 

128 0 

ITM8y2 

1280 

ITM9 

1292 


IIMXFL 

1267 

ITMXN 

1259 

I THY 

1272 


irop 

0098 

LDA 

0 088 

LISMl 

1305 


LITM3 

1263 

LITM4 

1264 

LITM5 

1266 


LLUMl 

1346 

LLUM2 

1345 

LLUM3 

1347 


LLUMA 

1377 

LLUMB 

1378 

LLUHC 

. 1363 


LST 

0088 

LU 

■ D860 

LUl 

,0 874 


LU22 

0 89 6 

LU23 

0901 

LU28 

0906 

o 

LU34 

0 933 

LU35 

0 945 

LU36 

0 921 


LU42 

0985 

LU4CTR 

. 0993 

LU5 

0 996 


LU599 

1013 

LU5CTR 

1058 

LU5LTP 

1057 


LU5ML1 

1038 

LU6 

1076 

1U61 

1 0 84 

u 

LU6LL 

1125 

LU6PT 

1124 

LU7 

1136 


LU74 

1162 

LU741 

1163 

1U745 

1173 


LU7 NEL 

1213 

LU7TH 

• 1212 

LU7TP 

1 1 76 


LUG4 

0 860 

LUCMl 

1332 

LUCM2 

1331 

U 

LUH3 

1347 

LUH3V1 

■ 134? 

LUH4 

1348 


LUH8 

1362 

LUMSyi 

1362 

LUMsye 

1362 


LUMR 

1378 

LUMG 

1363 

LUMGVl 

1 3 6.| 

o 

LUMF¥2 

137 4 

LUMX 

1343 

LUMXFL 

1351 

LUHZN 

1371 

LUN 

0 860 

LUOP 

0860 


LZITM 

1288 

LZITO 

1289 

.HASKT 

0D92 


SISM2 

130 4 

SISM3 • 

1307 

SISM4 

1310 


SITM6 

1265 

SITM7 

1278 

SITM8 

1280 

o 

SLJM3 

1347 

SLUM 4 

■ 1348 

SLUM 5 

1349 


SLUMC 

1363 

SLUHO 

. -1365 

SLUME 

1373 


SUCM4 

1337 

SUCMX 

1329 

SYISH 

1318 


UCll 

C685 

UC12 

0687 

UC13 

0689 


u 


O 


SYMBOLS »»» 


COMPRa 

0093 

CON 

QQ88 

IS 

0442 

ISO 

0445 

IS151 

0 47 3 

IS152 

0477 

IS18UF 

0452 

ISIEI 

0514 

IS21 

0556 

IS211 

0561 

IS2GT1 

0581 

IS2GT2 

0 583 

IS32 

0622 

IS33 

0623 

IS3TP 

0664 

IS3TP1 

0665 

ISM 2 

1304 

ISMS 

1307 

ISM4V3 

131G 

ISM5 

1321 

ISMYFL 

1324 

ISHYN 

1316 

ITlll 

0123 

IT12 

0127 

ITILN 

0142 

ITITP 

0178 

IT32 

Q2Q4 

IT321 . 

020 6 

IT3 6 

0 240 

IT39 

024.3 

IT44 

029 0 

IT45 

0293 

IT524 

0 310 

IT54 

0322 

IT5QSy 

0383 

, IT6 

0387 

IT6CT1 

0435 

IT6CTR 

0434 


ITFIL 0180 

ITM6V1 1265 

ITM9TB 1293 

ITHYFL, 1281 

LIS'M2 130 4 

LITM6 1265 

LLUM4 1343 

LLUMD 1365 

LU121 0875 

LU3 0910 

LU38 Q916 

LU51 0998 

LU5H1 1B4C 

LU63 1089 

LU71 1139 

LU744 1189 

LUB 1223 

LUCM3 1333 

LUM5 1349 

LUM9 1375 

LUMO 1365 

LUMXN 1343 

LTISH 1318 

MOP 0089 

SISH5 1321' 

SITMA 1291. 

SLUH6 1350. 

SLUMP 1374” 

SYITM 1274 

UC134 0695 


ITIFG Q09'8 

ITM6V2 1265 

ITMA 1291 

ITMYN 1272 

LISM3 1307 

LITM7 . 1278 
LLUH5 1349 

LLUME 1373 

LU131 0879 

. LU31 0 913 

.1U39 0927 

LU52 1003 

LU5M2 1043 

LU65 1092. 

LU712 1145 

LU745 .. 1193 

LU80UT'. 124-4 

, LUCM4 1337 

LUH5V1. 1349 

LUM9V1 1375 

LUME , 1373 

LUMY 1356 

LYISO , 1319 

N0ISP 0092 

SISMX 1302 

SITHB 129 6 

SLUH7 1360 

. SLUMX 1343 

SYLUM 135 8 

UG135 0699 


n 


O 


FMASK 

0092 

FNR 

0093 

GMS 

0088 

I 

0000 

o 

ISl 

0 45 5 

ISll 

0456 

IS12 

0458 

IS13 

0 463 

IS16 

0 48 2 

IS161 

0483 

ISl 62 

0485 

IS163 

0489 


ISIERR 

0 504 

ISIETP 

0513 

ISIEXT 

0 511 

ISILN 

0528 


IS212 

0 563 

IS22 

0567 

IS221 

0 574 

IS23 

0565 

o 

IS2GT3 

0 584 

IS2GT4 

0588 

IS2TB1 

0 592 

IS2TB2 

0 593 

IS34 

0 63 7 

IS341 

0541 

IS3 5 

0 650 

IS351 

0 656 


ISCl 

0442 

I SC 2 

0442 

ISC3 

0 442 

ISC4 

G 442 


ISM3V1 

1307 

ISH3y2 

1307 

ISM3V3 

1307 

ISM3VR 

1308 

o 

ISH5TB 

1322 

ISM5V1 

1321 

ISMFG 

0 442 

ISMX 

1302 

ISN 

0 A42 

ISOP 

0442 

IT 

0 098 

IT 1 

0109 


IT13 

0132 

IT14 

0130 

IT15 

0145 

IT16 

0151 


IT2 

0 160 

IT21 

0161 

IT22 

016 5 

IT23 

0168 

o 

IT33 

0 20 9 

IT331 

0213 

IT332 

0217 

IT34 

0219 

IT3CTR 

0246 

IT3TP 

0247 

IT4 

0 264 

IT41 

0 265 


IT4CT.R 

0269 

IT4TP 

0325 

IT5 

0 295 

IT51 

030 0 


IT55 

0360 

IT551 

0368 

IT552 

0366 

IT55CT 

0 382 

o 

IT61 

0389 

IT62 

0394 

IT63 

0400 

IT65 

0407 

I T7 

0 432 

IT8 

0341 

IT 81 

0350 

ITCl 

0098 


IlMl 

1262 

ITM2 

1261 

ITH3 

1263 

ITM3V1 

1263 


ITM7 

1278 

ITM7V1 

1273 

ITH7V2 

1278 

ITM8 

1280 

o 

ITMA¥1 

1291 

ITMB 

1296 

ITMFG 

D098 

ITMX 

1259 


ITMZ 

128 6 

ITMZFL 

1297 

ITMZM 

128 6 

ITM 

0098 


LISM4 

1310 

LISM5 

1321 

LITMl 

1262 

LITM2 

1261 


LITM8 

128 0 

LITM9 

1292 

LITHA 

1291 

LIT MB 

1296 

o 

LLUM6 

1350 , 

LLUM7 

1360 

LLUM8 

1362 

LLUM9 

1375 


LLUMF 

1374 

LOGl 

0093 

LOGIA 

0 093 

LOG2 

0 093 


LUl 9 

0882 

LUIER 

0950 

LU2 

0891 

LU21 

0893 


LU33 

0 92 9 

LU331 

0930 

LU332 

0 93 4 

LU333 

0935 

o 

LU3CTR 

0947 

LU3TAD 

0948 

LU4 

0974 

LU41 

0979 

LU53 

1009 

LU57 

1015 

LU571 

1025 

LU58 

1028 


LU5M3 

1049 

LU5M4 

1052 

LU5HAT 

1037 

LU5MEX 

1055 


LU651 . 

1097 

LU652 

1105 

LU66 

1121 

LU6CTR 

1123 

o 

LU72 

1151 

LU721 

1153 

LU73 

1156 

LU731 

1159 

LU7451 

1197 

LU746 

1199 

LU75 

1201 

LU7CTR 

1211 


L U8 TP 

1 251 

LUCl 

0 8 60 

LUC2 

0 86 0 

L UC3 

0 860 


LUFIL 

B96 8 

LUIFG 

0860 

LUMl 

1346 

LUM2 

1345 

o 

LUM6 

1350 

LUH6V1 

1350 

LUM7 

1360 

LUM7V1 

1360 

LUM9V2 

1375 

LUMA 

1377 

LUMAVl 

1377 

L UM A V2 

1377 


LUNEVl 

1373. 

LUMF 

1374 

LUMFG 

0 860 

LUMF VI 

1374 


LUMYFL 

1366 

LUMYN 

1356 

LUMZ 

1371 

LUMZFL 

1379 

o 

LYITM 

1274 

LYITO 

1275 

LYLUM 

1358 

LYLUO 

1359 

NEXTN 

138 5 

P, 

0738 

SEGCOR 

0 087 

SEGSIZ 

0084 


SISMY 

1316 

SITM2 

1261 

SITM3 

1263 

SITM4 

1264 


SITMX 

1259 

SITMY 

1272 

SITMZ 

128 6 

SLUM2 

1345 

o 

SLUMS 

1362 

SLUM9. 

1375 

SLUMA 

137 7 

SLUMS 

1378 

SLUMY 

1356 

SLUHZ. 

1371 

SUCM2 

1231 

SUCM3 

1333 


SYSSEG 

0082 

SZITH 

1288 

UC 

0 673 

UCl 

0 683 


UC1351 

0701 

UC136 

0706 

UG137 

0 70 9 

UC18 

0 716 

o 


o 

O 
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UC181 

0730 

UC19 

.0 713 

UCICTR 

0 733 

UC2^ 

0777 

UC25 

•0 78 0 

UC251 

0793 

UC2G1 

0810 

UC2G2 

0812 

UG2GCP 

0808 

UCCA 

0 67 3 

UCFIL 

.0749 

UCIFG 

0673 

UCMA 

133 7 

UCH4V1 

1337 

UCM4y'2 

1337 

W 

0738 

WIT 

0185 

WITCl 

0185 

WITN 

0185 

WITOP 

0185 

WLU 

0 9 63 

WLUMFG 

0963 

WLUN 

0963 

WLUOP 

0963 

WUGIFG 

0754 

WUCMFG 

0754 

WUGN 

0 7.54 

XI3FIL 

0595 

XISIFG 

.0 536 

XISMFG 

D536 

XITC4 

0254 

XITFIL 

•0327 

XITIFG 

0254 

XLUC3 

1065 

XLUC4 

,1065 

XLUFIL 

1128 

YISC2 

0600 

yiSC3 - 

•0600 

YISC4 

0600 

yisop 

0600 

YIT 

0 332 

YlfDl 

0332 

yiTMFG 

0 332 

YITN 

0 332 

YITO 

1275 

YLUFIL 

1215 

YLUIFG 

1133 

YLUM 

1358 

ZLU 

122 0 

ZLUCl 

1 220 

ZL.UC2 

1220 

ZLUOP 

1220 
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UCIDCT 

0740 

UG2 

076 5 

UC21 

0 766 

UC26 

0795 

UC29 

0842 

UC299 

0850 

UC2NLU 

0827 

UC2SF 

0821 

UC2TP 

0825 

UCHl 

1332 

UCM2 

1331 

UCH3 

1333 

UCHFG 

0673 

UCHX 

1329 

UGHXFL 

1338 

WITC2 

0185 

WITC3 

0185 

WITC4 

0185 

WLUGl 

0963 

WLUC2 

0963 

WLUC3 

0963 

WUC 

0754 

WUCCl 

0754 

WUCC2 

0754 

WUCOP 

0 754 

XIS 

0536 

XISGl 

0 536 

XISN 

0 53 6 

XISOP . 

0536 

XIT 

0254 

XITMFG 

0254 

XITN 

0254 

XITOP 

0254 

XLUIFG 

1065 • 

XLUMFG 

1065 

XLUN 

1065 

YTSFIL 

066 8 

YISIFG 

G6D0 . 

YISH , 

1318 

YITC2 

0 332 

YIFC3 

033 2 

YITC4 

0 332 

YIT OP 

0332 , 

YLU 

1133 

YLUCl 

1133 

YLUMFG 

1133 

YLUN 

1133 

YLUO 

1359 

ZLUC3 

1220 

ZLUC4 

1220 

ZLUFIL 

1254 


UC22 

0763 

UC23 

0770 

UC231 

0773 

UC2ALU 

0828 

UC2CTR 

0326 

UC2DCT 

0832 

UGCl 

0673 

UCC2 

0 673 

UCC3 

G673 

UCH3TB 

1334 

UCH3V1 

1333 

UCM3V2 

1333 

UCHXN 

1329 

UCN 

0 673 

UCOP 

0673 

WITFIL 

0249 

WITIFG 

0185 

WITMFG 

0185 

WLUC4 

0963 

WLUFIL 

1060 

WLUIFG 

0963 

WUCC3 

0754 

WUCC4 

0 754 

WUCFIL 

0855 

XISC2 

0536 

XISC3 

0536 

XISC4 

0536 

XITCl 

0 254 

XITC2 

0254 

XTTC3 

0254 

xtu 

1065 

XLUCi 

1065 

XLUC2 

1065 

XLUOP 

1065 

YIS 

0600 

YISCl 

0600 

YISHFG 

0603 

YISN 

0600 

YISO 

1319 

YITFIL 

0437 

YITIFG 

0 332 

YITM 

1274 

YLUC2 

1133 

YLUC3 

1133 

yLUC4 

1133 

YLUOP 

1133 

ZITM 

1288 

ZITO 

1289 

ZLUIFG 

1220 

ZLUMFG 

1220 

ZLUN 

1220 
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STRTSG 


NAH C03R0 DECK-IO N60 MSOS 5 " 

HASS STORAGE OPERATING SYSTEM VERSION 
SMALL SYSTEMS DIVISION, LA JOLLA, CALIFORNIA 
COPYRIGHT CONTROL DATA CORPORATION 1976 
MAC A 


STRMSG 


CONSFR 


LISTIT 


WRITIT 


ANSWER 


MESSAG 


MAC 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

NUM 

EMC 

MAC 

EQU 

EQU 

EQU 

EMC 

MAC 

ENA 

ENQ 

RTJ- 

NUM 

ADC 

EMC 

MAC 

ENA 

ENQ 

RIJ- 

EHC 

MAC 

ENA 

ENQ 

RTJ- 

EMC 

MAC 

ENA 

ENQ 

RTJ- 

EMC 

MAC 

EQU 

EQU 

HUH 

ALF 

IFC 

IFC 

EQU 

ALF 

EIF 


*A* l») 

•A'NC *A */S£GSIZ-SYSSEG/SEGSIZ) 
*A*OP(» A»»-SEGSIZ? 

"A* IFGl * A*+SEGSIZs-15 
«A*MFG( *A•^-SEGSIZ>^2) 

*A*G1 (* A* + SEGSIZ+3) 

•A*C2f * A*«-SEGSIZ4-4} 

*A*C31* A »ft-SEGSIZ*5 ) 

"A'CAC* A'^-SEGSIZ^-6) 

0 

A 

S*AM*-SYSS£GJ 
*A* (*) 

*A»N{ »/SEGSIZ-SYSSEG/SEGSIZ) 
A,B,C,0,E 

® c * 

CNSjI 

» A« 

«£«iH 

A 

L»A* 

•A* 

LST,I 

A 

L'A* 

•A* 

WRT,I 

A 

L»A* 

»A*. 

ANS,I 

A,a,C,0,E,F,G,H,I, J 
A'h-SEGCOR) 

S*B»I=»3 

, ,*0* . 

«E*,NE,-D 
*E*,EQ, 1 

V1C--*A»»SEGC0R) 

. ,*F» . 


•in 


SUMMARY-110N8000001 
N80000D2 
N8a00003 
N80000DA 
N8000005 
N8000006 
N8000007 
N3000a08 
N800 0009 
N8000010 
N8000011 
N8000012 
N300Q 013 
N80S0014 
N8000015 
N3000016 
N8C0G017 
N8000018 
N8000019 
N8Q00020 
N300G021 
N8DG0022 
N8000023 
N8C0002A 
N8000025 
N8QQQQ26 
N80Q0027 
N8000028 
N8000029 
NSOGGQSO 
N8000031 
N8000032 
N800D033 
N800G03£f 
N3B08Q35 
N8iOD036 
N8000037 
N3000038 
N8000Q39 
N80000A0 
N8000041 
N8000042 
N80Q0043 
N800QQ44 
N8000045 
N8000046 
N8fl00047 
N8000048 
N80Q0049 
N800Q050 
N80QQ051 
N8000052 
N800GQ53 


G 

□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 



o 

o 
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o 

o 
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o 
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N3000054 

N3000Q55 

N8000056 

N8G00Q57 

N8000Q58 

N8000059 

N800D060 

N80Q0061 

N8000062 

N30a0063 

N8000064 

N3fi00065 

N3000066 

N8000067 

N3000Q66 

N800CQ69 

N800007G 

N8COOa71 
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O 

o 

o 
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o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 
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o 

o 

0073 



SYSTEM CHECKOUT 2.0 - 31 DEC. 71 

N80Q0073 



o 


0074 



PROGRAM BASE - SYSTEM CHECKOUT 1.0 

N800 0074 




o 








o 


0076 


SYSTEM CHECKOUT SEGMENTS - 3RD 

N3000076 





0077 

If- 


SYSTEM CHECKOUT PROGRAM SEGMENTS 

N8000077 




o 

0078 

0000 P 

EQU 

S YSSEG{ *^) 

N80Q0078 



^ o 

0079 




N8000J379 




0080 

0060 

EQU 

SEGSIZ196) 

N800Q080 





0081 



}f ^ ^ :f. if. 

» » » N8000081 




o 

00 82 


AGREE KITH EQU*S IN 

SYSCOP»»*^7»»»-»^*»^»N80Q0 082 



o 

0083 

0016 

EQU 

SEGC0R122) 

»»18SOS 4.QNBQ00083 



1 

00 8 4 

DO 01 

EQU 

LDAll) ,GONO) ,LST{5UWRT(7) .ANS t9) ^ ATA C 11 ) . CNSI 13 ) ^ GM S 115} N80 0 0 08 4 






00 03 







o 


00 05 
00 07 
00 09 
00 08 






o 

o 

008 5 

OQOD 

OflOF 

0011 

EQU 

MOP. (17) 

N30QOQ85 



o 


QQ8 6 

0 013 

EQU 

CMP (19) 

»»HSOS 4.0N8000086 




o 

0087 




^ » N8000087 



o 

o 








o 

o 








o 

o 








^ o 

o 








o 

o 








o 
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o 

o 
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o 








o 
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c..,) 


o 

o 

o 

o 


0089 
009 0 

0091 

0092 

0093 

0094 

0095 

0096 

0097 

0098 

0099 

0100 
0101 
0102 


a- 




EXT SCHLNG, SCHT0P,V0LBLK,V0LEND 
EXT CALTHD,SWAPON,L’\/LSTR 


EXT 

EXT 

EXT 

EXT 

EXT 

EXT 

EXT 


ODEBUG, HIP.ro 
LOAOSD, J 08ENT 
JPLOAD, JPCHGE 
REST0R,RC0VER 
jCR0y4, JLG0V4 
AFIL\?4 

TOFUNC, EFLIST 


, JO BPRO, PROTEC 
,JPT13 ,LIBEOT 
,BRKPT 

, JPFLV4, JPSTV4,NAMFV4 
jEFSTOR 


»=sfMSOS 

♦’^MSOS 4. 
*»HSOS 
♦^MSOS 
»»MSOS 4. 


EXT MIB, MIBX lUNPIOtSFASWjFILEl ,FILE2 ,FILE3 ,F IL E4 , UNPTIH 
EXT TRAN'if ,LOAOIN,SWTCH 

EXT ALCLGH CORE ALLOCATOR LENGTH TABLE 

EXT THOS, USE, LSTPRT, BUSY, PART8L 


N80QQ089 
N8GC0 090 
N8000091 
N8000G92 
4. QN8 00 0Q9 3 
NS000 094 
1»^N8QQ0095 
4. ON800fl096 
4* 0N30Q0097 
1^»N80QO 098 
N8000099 
N8000100 
NaooaiQi 
N8000102 
N8000103 


□ 

O 

o 

C) 
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o 
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010 6 




0107 




G108 




0108 

GOOD 

P 


0108 

0000 



0108 

0 0 60 

P 


QIO 8 

0061 

P 


010 8 

0 0 62 

P 


0108 

0 0 63 

P 


0108 

006A 

P 


0108 

0065 

P 


OIQ 8 

0066 

P 


010 8 

POODO 0000 
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SCHEDULER STACK 
STRTSG SS 


DATES 08/19/99 

ANALYSIS 


N800G105 

N8G00106 

N30Q0187 

NSOOfllOa 


0110 






* 

0111 

POCOl 

COOfl 


SSI 

LOA 

= X$EF 


P0 002 

OQEF 





0112 

P00G3 

5101 



RTJ- 

LOA 1 1 

0113 

P0004 

682D 



STA^ 

SSILVL 

OllA 

P0 00 5 

GOOD 

X 


LOA 

=XSCHLNG 


P000 6 

7FFF 

X 




0115 

P0QQ7 

CF 42 



ARS 

2 

0116 

P0008 

682B 



ST A* 

SSINEN 

0117 

pQoag 

G’8 42 



CLR 

Q 

Oil 8 

POOflA 

CDGO 

X 

SSll 

LDA 

=XSCHTOP 


PODOB 

7FFF 

X 




0119 

POOOC 

5101 


SS12 

RTJ- 

LDA, I 

012 0 

POOOO 

0900 



INA 

0 

0121 

POOOE 

OlOF 



SAZ 

SS15 

0122 

POGDF 

6823 



ST A* 

SSIENT 

0123 

POOlO 

5101 



RTJ- 

LDA, I 

012 A 

PDOll 

A006 



AND- 

6 

0125 

PD 012 

981F 



SUB^ 

SSILVL 

D126 

P0013 

0133 



SAM 

SS13 

0127 

P0014 

0102 



SAZ 

SS13 

0128 

P0015 

580F 



RTJ^ 

SS17 

0129 

P0D16 

1803 



JHP^ 

SS131 

0130 

P0017 

88 lA 


SS13 

AOO'» 

SSILVL 

0131 

P0Q18 

6819 



STA^ 

SSILVL 

0132 

PG019 

0814 


SS131 

TRQ 

A 

0133 

POQIA 

9819 



SUB’ 

SSINEN 

013A 

POOIB 

0134 



SAM 

SS132 

0135 

POOIC 

5806 



RTJ’ 

SSI 7 

013 6 

POOID 

ODOi 



INQ 

1 

0137 

POOIE 

48 45 


SSI 5 

sia» 

SSCl 

0138 

POOIF 

1817 



JMP» 

SS2 

0139 







0140 

PD020 

ODOI 


SS132 

INQ 

1 


»STACK ERROR » ^ » 


PRIORITY LEVEL 
LENGTH OF STACK 


SAVE IT 


END OF THREAD 


GAN NOT BE .GT, PREVIOUS LVL. 

OK 

OK 

ERROR 

SET UP LOWER LEVEL 


TOO MANY ON THREAD ERROR 
MAKE 1 EXTRA TO SHOW ERROR 
OK~NUH0ER ON STACK 
GO ON 


» N800 

0110 

N800 

0111 

N800 

0112 

N80D 

0113 

N800 

011-4 

N800 

0115 

N800 

0116 

Naooaii7 

N80a 

0118 

N800 

0119 

N8 0 0 

0120 

N80Q 

0121 

N8G0 

G 122 

N80Q 

0123 

N8I3G 

0124 

N800 

0125 

N800 

0126 

N8QQ 

0127 

N800 

0128 

N808 

0129 

N300 

G13C 

N80Q 

0131 

N8Q0 

0132 

N800 

0133 

NSflO 

0134 

N800 

0135 

N80a 

013 6 

N8 00 

0137 

N800 

0136 

N800 

0139 

N800 

0140 


o 
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o 

o 

o 

o 
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o 

o 

o 

o 

o 

o 

o 

o 
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O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


0141 P0021 C811 

0142 PQ022 0902 

0143 PQ023 18E8 

0144 P0024 0000 

0145 P0025 483E 

0146 P0026 E83C 

0147 PQ027 0142 
0146 P0028 E83B 

0149 P0029 ICFA 

0150 

0151 P002A 680A 

0152 P002B OAOB 

0153 PD02C 510F 

0154 P002D OAOO 
G155 P002E 5111 

0156 P0G2F C805 

0157 P0030 18F7 

0158 

0159 P0031 OOOO 

0160 P0G32 0000 

0161 P0033 OOOQ 

0162 PD034 OOOQ 

0163 P0035 0000 
0154 


LDA^ SSIENT 
INA 2 
, JMP-*^ SS12 
SSI 7 NUM 0 

STQ» SSCl 
LDQ» SSMFG 
SQZ SS18 
SS171 LDQ* SSCl 

JMP» (SS17) 

SS18 STA* SSlfP 
SS181 ENA SSMXN-SSN 
RTJ- GM5,I 
ENA LSSHl 
RTJ- MOP, I 
LDA» SSIFP 
JMP»^ SS171 

SSIL^L NUM 0 
SSI EMT NUM 0 
SSINEN NUM 0 
SSITP NUM 0 
SSINDS NUM 0 


ERROR SAVE Q 
ERROR NOT OUT YET 
GO ON 


OUTPUT ERROR MESSAGE 


0166 

0167 P0036 OAOB 

0168 P0037 510F 

0169 P0038 C82A 
017Q P0039 0111 

0171 P003A 0124 

0172 P0038 C8F7 

0173 P003C 5103 

0174 P003D 4135 

0175 P0Q3E C825 

0176 P003F 5103 

0177 P0040 4147 

0178 

0178 P0041 0A23 
Q178 P0042 0C24 

0178 P0Q43 5105 

0179 

0180 P0044 OCOl 

0181 P0045 ICBA 


SS2 

SS21 


V- >(■ 


ENA SSMXN-SSN 
RTJ- GMS,I 
LDA^ SSMFG 
SAN SS21 
RAO- SSH2,I . 
LOA» SSINEN 
RTJ- CON, I 
STQ- SSM2V1,I 
L0A» SSCl 


PTJ- CON, I 
STQ- SSM2V2,! 
LISTIT SSH2 


ENQ, WSSN-SSN 
JMP» ?SS) 


’^NUM OF ENTRIES^ 

NOT RELATED 

SAVE NUM OF ENTRIES 
OUTPUT MESSAGE 

EXIT 




o 


o 




N8000141 


N8000142 


N8000143 


N80Q0i44 

o 

N80QQ145 

N8G00146 


N8000147 


N3000148 

o 

N8D0D149 

N8000150 


N6Q00151 


N8000152 

o 

N8000153 

N8000154 


N8000155 


N80Q0156 

o 

N8000157 

N8000158 


N800Q159 


N8000160 

o 

N80G0161 

N8000162 


N8C00163 


N8G00164 

o 


: 

» N800Q166 


N800 0167 


N80DD168 

• o 

N8000169 

V..' 

N800G170 


N8080171 


N8D0Q172 

• o 

N8000173 

N8QQ0174 


N8G00175 


N8000176 

o 

N8000i77 

N8Q00178 



o 

N8000179 


N80QO 180 


N8000181 

o 


o 


o 


o 


C03RD 


PAGE 7 


DATEI 08/19/99 



i-' 0183 P0 046 OOIA 

o 
o 
o 
o 
' o 

I 

o 

o : 
o 

i o ■ 

I 

o 

o 

o 

I ' 

I o 
! ^ 


BZS SSFILlS£GSIZ-^+SS) 


o 

N3000183 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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N8000185 

N8Q0Q186 

N80Q0187 

N800Q188 


» » 


N80Q0190 

N8000191 

N8000192 

N8000193 

N800019% 


N8000195 

H8000196 
N8000197 
N80Q0198 
N80Q0199 
N80D 0 200 


N8000201 


N8000202 
N800Q203 
N8Q0020A 
N8 0Q 0 20 5 
N8000206 
NS0002C7 
N8000208 
N800 0 209 
N800021D 


r ") 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 
o 

o 


( '1 
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o 

o 












o 

o 

0212 



» » ♦ s ♦ 

•^LAST ENTRY TO BE SCHEDULED 

¥ 

9 

9 ^ 

» N8D00212 



o 

0213 

P007D 

GOOD 

SS4 LOA =N$B4 





N8D00 213 





P0 07E 

00B4 











0214 

P007F 

5101 

RTJ- LOA, I 

GET TOP OF EMPTY 




N300Q 214 




o 

0215 

P0080 

0900 

INA 0 





N80G0215 



o 

0216 

P0081 

OlOD 

SAZ SS5 

ALL WERE USED 




N8000216 




0217 

P0082 

58 29 

RTJ» 5S3GT 

GET ONE 




N80D0217 





0218 

P0083 

C836 

LDA*^ SS3IP+2 





N8000218 




o 

0219 

P0084 

DlOA 

SAZ SS5 

NOT USED 




N8Q00219 



o 

0 22 0 

P0 085 

OA08 

SS41 EMA SSliVN-WSSN 





N8000220 




0221 

P0086 

51DF 

RTJ- GMS,I 





N8D00221 




o 

0222 

0222 

P0087 

0 A 57 

CONSTR 5,SS3TP, 

SSM5Vi^WSS,l 




N8000222 



■ o 

0222 

P0088 

0C25 










0222 

P0089 

510D 











0222 

P008A 

80 05 










o 

G222 

0223 

PQ08B 

0002 

LISTIT SSH5 





N8000223 



o 


0223 

PQ08C 

OAIC 











0223 

P008D 

0C16 










o 

0223 

0224 

P0 08E 

5105 






N80B0224 



o 

o 

0226 



^ ^ V- ¥ 9- 

=^VOLATILE STORAGE » * 

9 

9- 

9 

9^ N8000226 



o 

o 

0227 

P008F 

GOOD X 

SS5 LDA =XS/OLENO 





N8D0 0227 



o 


P0090 

7FFF X 










0228 

P0091 

9825 

SUB^ SS5TP 





N80Q0228 





0229 

Pfl092 

68 25 

Slk* SS3fP 

SAVE TOTAL VOL 




N8000229 




o 

0230 

P0093 
PO 094 

CQOO 

OOFO 

- LDA =N$FO 





N8000230 



o 


0231 

P0095 

5101 

RTJ- LOA.,I 





N80Q0231 





0232 

P0096 

9820 

SUB» SS5TP 

ASSIGNED 




N80S0232 




o 

0233 

P0097 

681F 

STA"» SS5TP 





N8OG0233 



o 

0 23 4 

PQ098 

Q Aoa 

ENA SSHYN-HSSN 





N3GQ0234 




0235 

P0Q99 

510F 

RTJ- GMS,I 





N8G00235 




o 

0236 

0236 

P009A 

0 A 56 

CONSTR 2,SS5TP, 

SSM6V1 ,WSS,4 




N8000236 



o 

0236 

P009B 

0C-3A 










0236 

P0G9C 

510D 











0236 

P0 09D 

00 02 










o 

0236 

0237 

PQ 09E 
P009F 

00 05 
C817 

LDA» SS5TP 





N8000237 



o 


0238 

POOAO 

0133 

SAM SS51 

NEG VOL USED 




N800 0238 





0239 

POOAl 

9816 

SUB-'^ SS3TP 





N800D339 




o 

0240 

P0QA2 

0121 

SAP SS51 

ERROR VOL ALL GONE 




N8Q0024Q 



: ^ 

0241 

P0QA3 

0133 

RAO- SSH6,I 





N3000241 



o 












o 

o 












■ o 




o 

o 

o 

o 

o 


0 ^ 5 ^ 

0253 P00A8 0000 

0254 PQDAC 680B 

0255 POOAD 0C03 

0256 POOAE 0834 

0257 POOAF 5101 

0258 POOBt) 6A08 

0259 POOBl ODFE 

0260 P00B2 0172 

0261 P00B3 C804 

0262 P00B4 18F9 

0263 PQ0E5 1CF5 


SS3GT NUH 0 

STA*- SS3TP 
ENQ 3 
SS36J1 AAQ A 

RTJ- LOAtl 
STA-ff SS3rPH,Q 
INQ -1 
SQM SS3Gf2 
LDA^ SS3fP 
JMP» SS3GT1 
SS3Gf2 JMP^ ISS3G!n 


0264 ^ 

0265 P0066 7FFF X SSSfP AOC yOLBLK 

0266 P00B7 0005 BZS SS3ITP15} 


GET ENTR7 


SA-yE ENTRY 


o 

0268 P008C 0004 BZS WSSFILC 5EGS IZ-»»-WSS ) 

O 

o 

O 

O 

o 


N8000242 


N8Q00243 


N8000245 
N3DQ0246 
N800Q247 
N8000248 
N8000249 
N800 0250 


N30Q0252 

N300D253 

N800D254 

N3000255 

N80Q0256 

N8000257 

N8000258 

N8000259 

N80B026B 

N8000261 

N8000262 

N8000263 

N8000264 

N80Q0265 

N8000266 


N8000266 


O 

□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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027D 



0271 



0272 


* 

0273 

0273 

OOCO 

P 

0273 

0 0 02 


0273 

0120 

P 

0273 

0121 

P 

0273 

0122 

P 

0273 

0 1 23 

P 

0273 

0124 

P 

0273 

0125 

P 

0273 

0126 

P 

0273 POOCO 

GOOD 



ALLOCATABLE CORE ANALYSIS 
STRTSG AC 


N300027D 

N80D0271 

N8000272 

N80Q0273 


0275 




» » » 


0276 

POflCl 

OAOB 


ACl ENA 

ACMXN-AC 

0277 

PQ0C2 

51DF 


RTJ- 

GMS,I 

0278 




LISTIT ACM2 

0278 

P00C3 

0A19 




027 8 

P00C4 

0C24 




0278 

POOC5 

5105 




0279 




-# 


0280 

P00C6 

QAOF 


ACll ENA 

15 

0281 

P00C7 

68 5F 


STA'*^ 

ACC4 

0282 

PflflCS 

0 A02 


ENA 

2 

0283 

P00C9 

685A 


STA* 

ACCl 

0284 

POOCA 

EG GO 

X 

LOQ 

=XALC1GH 


POQCS 

7FFF 

X 



0285 

POOCC 

0814 


AC115 TRQ 

A 

028 6 

PQOCD 

51 OB 


. RTJ- 

ATA,r 

0287 

PQOCE 

0103 


SAZ 

NXTACL 

0288 

PQOCF 

0902 


INA 

2 

0289 

POOOO 

■ 8853 


■ADO* 

ACCl 

0290 

PGODl 

68 52 


• STA^ 

AGCl 

0291 

P0002 

■C854 


■NXTACL LOA» 

ACCL 

0292 

P0CD3 

0 9FE 


INA 

-1 

0293 

P0004 

0103 


SA7 

ACLNTH 

D294 

POOD 5 

68 51 


ST A* 

ACCL 

0295 

POOD 6 

■OOOl 


. INQ, 

1 

0296 

P0QD7 

18F4 


■ JMP^ 

AC115 

0297 

P0DO8 

EO 00 

X 

ACLNTH LOa 

=XCALTHD 


POO09 

7FFF 

X 



0298 

POODA 

0814 


TRQ, 

A 

0299 

POODB 

0901 


INA 

1 

0300 

POODC 

.5108 


RTJ- 

ATA,I 

0301 

POOOO 

6644 


. 'STA» 

AGIFG 

0302 




» 


0303 

POOOE 

08 14 


TRQ 

A 


-^ALLOCATABLE CORE HAP SET-UP * ^ 

GET MESSAGE BLOCK 
OUTPUT HEADER 


SET INDEX FOR ALGLGH 

SET INITIAL LENGTH FOR ALLOCATABLE' 

ADDRESS OF ALLOCATABLE CORE 

LENGTH TABLE IN AUTOLOAD IMAGE SPACE 

IF AREA IS ZERO GET NEXT LENGTH 
IF NOT, ADJUST FOR LENGTH AND THREAD 

LAST AREA 
YES 

NO, GET NEXT LENGTH 
ADJUST FOR NEXT TABLE ENTRY 

GET START OF ALLOCATABLE CORE 
START OF ALLOCATABLE CORE 


» N8000275 
N300027& 
N8000277 
N8C00278 


N8000279 

N800028Q 

N80Q0281 

N8CCQ282 

N8C00283 

N 8 a 0028 A 

N3SGQ285 
N80flil2S6 
N8G0Q287 
N800Q288 
N8G00289 
N8000290 
N8 00 0 291 
N8000292 
N8 00 0293 
N8G00294 
N80GQ295 
N8D00296 
N8000297 

N8GQ0298 

N8G00299 

N800030il 

N8Q00301 

N800Q302 

N8000303 


r'-’i 









(■ 
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O 

0304 

PO O DP 

0901 



INA 1 


N8000 304 

o 


030 5 

PQQEQ 

5101 



RTJ- LDA,I 


N8D0 0 305 



03 06 

POOEl 

6844 



STA'» ACC3 

TOP OF EMPTY THREAD 

N800 0306 


O 

0307 






N8000307 

o 

0308 

POOE2 

GOOO 

X 


LDA =XSHAPON 


N8C00306 



P0 0E3 

7FFF 

X 




N3000309 



0309 

PD0E4 

5101 



RTJ- LCA,I 

GET SWAP FLAG 


o 

0310 

P00E5 

OIDB 



SAZ AC12 

GET LENGTH OF ALLOCATAB‘LE CORE 

N8000310 

o 

0 311 

P00E6 

C 8 3 D 



LOA^ ACCl 

N800Q311 


0312 

P0 0E7 

883A 



AOD^ ACIFG 

ADD START OF ALLOCATABLE CORE 

N80G0312 



0313 

POOE8 

Q9FE 



INA -1 

ADJUST FOR UNPROTECTED -1 

N800Q313 


o 

0314 

P0QE9 

6818 



STA-» ACITMP 

SAVE LOWEST UNPROTECTED-1 

N80Q 0 314 

o 

0315 

POOEA 

GOOD 



LDA =XSF6 

GET HIGHEST UNPROTECTED -1 

N800Q315 



POOEB 

0 0F6 





N3000316 



0315 

PflOEC 

510B 



RTJ- ATA,I 

GET HIGHEST+1 


o 

0317 

POO ED 

9814 



SU8» ACITMP 


M8Q00317 

o 

0318 

POOEE 

09FE 



INA -1 

GET LENGTH 

N80D0318 


0319 

POOEF 

3834 



AOD’i^ ACCl 


N8000319 



03 2 0 

POOFO 

6833 



STA^ ACCl 

TOTAL CORE 

N800B320 


o 

0321 





N8000321 

c 

0322 




If- 



N800D322 


0323 

POOFl 

COOQ 


AC12 ■ 

LDA =N$E7 

GET LENGTH OF SYSTEM DIRECTORT-MM PORTION 

N800Q323 




P00F2 

0QE7 







o 

0324 

P0GF3 

5108 



RTJ- ATA,I 

LENGTH OF CORE S. D. 

N8000324 

o 

0325 

POOF4 

680D 



STA» ACITMP 


N800D325 


0326 

P0QF5 

cooo 



LDA =N$E6 


N800Q326 




P00F6 

aOE6 





N8000327 


o 

0327 

P0 0F7 

5108 



RTJ- ATA,I 


o 

0328 

POOF8 

9309 



SUB’^ AGITHP 


N8000328 


0329 

P00F9 

6829 



STA^ ACMFG 


N8000329 



0330 





GET START OF SYSTEM DIRECTORY 

N8000330 


o 

0 331 

POOFA 

COOO 



LDA =N$E8 


N8000331 

; O 


P00F8 

OGEB 





N8000332 


0332 

POOFC 

510B 



RTJ- ATA,I 




0333 

POOFO 

8804 



AOD» ACITMP 


N8fl00333 


o , 

0334 

POOFE 

6826 



STA'» ACC2 

START OF SYS DIR 

N8000334 

o 

0335 







N8000335 


0336 

POOFF 

OCOl 



ENQ WACN-ACN 


N8000336 



0337 

POlOO 

ICBF 



JMP» .lAGl 


N8000337 


o 

0338 

0339 

PQ 101 

0000 


ACITMP 

NUM 0 


N8 00 0 33 8 
N800Q339 

o 

o 

03 41 

P01Q2 

OOIE 



BZS ACFIL (GEGSIZ- 

^+AC) 

N8000341 

o 

o 









o 

o 









o 

o 









o 

o 









■ o 
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0343 







N80Q0343 

0344 




ALLOCATABLE CORE ANALYSIS PART W 

N80D 0344 

0345 







N8000345 

0346 




STRTSG WAG 



N3000346 

0346 

0120 

■P 






0346 

00 03 







0346 

0180 

P 






0346 

0181 

P 






0346 

0182 

P 






0346 

0183 

P 






0346 

0184 

P 






0346 

0185 

P 






0346 

0186 

P 






0346 P0120 

0 0 00 







0347 

0166 

P 

AC2QS V 

EQU AC2QSV(WACC43 



SYSCOP 2,ON8000347 

0348 



w 

WACIFG 

r: 

START OF ALL0CATA8LE CORE-NEXT BLOCK N8000348 

0349 




WACMFG 

zz 

LENGTH OF SYSTEH D 

IRECORY N8CQ0349 

0350 




WAGCl 

zz 

TOTAL ALLOCATABLE 

GORE N8CI80350 

0351 




WACG2 

— 

START OF SYS OIR 

N80Q0 351 

0352 




WAGC3 


TOP OF EMPTY CORE 

THREAD N8000352 


0354 

PQ121 

OBOO 

AC2SAC 

NOP 

0 







N80C0354 

035 5 

P012? 

C85F 

AC2BUF 

LDA-» 

WACIFG 







N8GQC355 

0356^ 

P0123 

68 FO 


STA» 

AC2SAC 







N8C00356 

0357 

P0124 

1805 


JMP» 

AC2 







N8Q00357 

0358 

P0125 

aeo4 


BZS 

AC2BU (7- 

*t-AC2BUFI 






N8G0C358 

0359 



» «■ 



» »ALL0CATA8LE 

CORE 

MAP » 

-V 

¥ 


* N3000359 

0360 

P0129 

0C06 

AC2 

ENQ 

6 







N8O0D36Q 

0361 

P012A 

C8F6 

AC21 

LDA*^ 

AC2SAC 

GET FIRST 7 

WORDS 

IN BLOCK 




N300G361 

0362 

PD12B 

0 8 34 


AAQ 

A 







N3000 362 

0363 

P012C 

5101 


RT,J- 

L0A, I 







N3000363 

0354 

P012D 

6AF4 


STA'» 

AC2QUF, Q 







N8100B364 

0365 

P012E 

OOF£ 


INQ 

-1 







N8000365 

0366- 

P012F 

01 71 


SQM 

AG22 







N800Q366 

0367 

P0130 

13F9 


JMP» 

AC21 







N800G367 

0363 












N80B8368 

0369 

P0131 

C8F1 

' AC22 

LDA^ 

AC28UFH 

THREAD 






N3D00369 

0370 

P0132 

9 8 EE 



AC2SAC 







N80Q0370 

0371 

P013.3 

09FD 


INA 

-2 







N8000371 

0372 

PQ13-4 

0101 


SAZ 

AG225 







N8000372 

0373, 

P0135 

1841 


JMP» 

AC25 

'EMPTY BLOCK 






N8000373 

0374 






FULL BLOCK 






N'8000374 

037 5 

PQ136 

E84C 

AC2 25 

LDQ* 

WACMFG 

FIND DIR. MATCH 





Ni000375 

0376 

P0137 

QDFC 


INQ 

-3 







N800C376 

0377 

PQ138 

G84C 

AC2SS0 

LDA’*^ 

WACG2 







N30Q0377 

0378 

P0139 

0834 


AAQ 

A 







N800Q378 

0379 

P013A 

5101 


RTJ- 

LOA,I 

GET LENGTH 






N8CGQ379 

0380 

P013B 

0902 


INA 

2 







N8000360 

D361 

P013C 

B8E5 


EOR’^ 

AC2BUF 







N80Q0381 



N8000382 
N800G383 
N300Q384 
N8D0 0385 
N3D00386 
N8000387 
N80B0388 

N8G00389 
N8000390 
N8000391 
N8000392 
N800D393 
N8000394 
N80Q0395 
M80Q0396 
N80Q0397 
N80Q0 398 
N8000399 
N8000400 
N30QQ4Q1 
N8000 402 
N8000403 


N3000 404 


N8 00 8 40 5 
N8fl004G& 
N8Q004Q7 
NSOOO 408 
N8000 409 
N8000410 
N8000411 
N8QB0 412 
N800Q413 
Naoao4i4 
N8 00 0 415 
N8000416 
N8000417 
N8O0Q418 
N8000 419 
N800042D 
N8000 421 
N8000422 
N8000423 
N8000424 
N8000425 


G 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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0428 

0429 

0430 

0431 

0432 

0433 
0 43 4 
0 43 5 

0436 

0437 
0 43 8 

0439 

0440 

0441 

0442 

0443 


P016O 

P016E 

P016F 

P0170 

P0171 

P0172 

P0173 

PD174 

PQ175 

P0176 

P0177 

P0178 

P0179 

P017A 

PQ178 

PQ17C 

PQ17D 

P017E 


DAOD 
0C16 
5105 
CQOO 
00 £7 
5101 
6B13 
OCOl 
IGAA 

G8 0F 
B8A9 
0101 
D8Q6 
C8A8 
680A 
OAOA 
510F 
18D2 


AC27 LISTIT ACHl 


AC243 LOA =X5E7 


RTJ- LDA,I 
STA^ WACD4 
END XACN-WACN 
JMP^^ •CWACI 

LDA-p WAGC3 
EOR.^^ AC2SAC 
SAZ AC251 
RAO» AC2ERR 
LDA«^ AC2BUFH 
STA’^ WACC3 
ENA ACMXN-WACN 
RTJ- GMS,I 
JMP* AG233 


SAVE INDEX TO FIRST HM ENTRY IN SYS OIR 


N8000426 


N8DQ0427 


P017F 0000 


AC2 5 


AC251 
AC2 52 


AC2ERR 


FOR NEXT OVERLAY 
EXIT 


EMPTY BLOCK 
OK 

THREAD BROKEN 
THREAD 


SYSCOP 2.GN800Q428 
SYSCOP 2.0N80G0429 
SYSCOP 2.0N80fl0430 
N8000431 
N80G0432 
N8flOD433 
N80Q0434 
N8000435 
N8000436 
N80C0437 
N800B436 
N3000439 
N8000440 
N8000441 
N80flC442 
N800 0443 


0445 P0180 0000 


WACFIL(SEGSIZ-»‘fWAC') 


N8G00445 


■ O 
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0447 




0448 




0449 




0450 




0450 

0180 

,P 


0450 

0004 



0450 

DIED 

P 


0450 

01 El 

P 


045 0 

01E2 

P 


0450 

01E3 

P 


0450 

Q1E4 

P 


0450 

01E5 

P 


0450 

01E6 

P 


0450 P0180 

OQOO 



0451 




0452 




0453 




0 45 4 




0455 




0456 

01E3 

P 



ALLOCATABLE CORE ANALYSIS PART X 
STRTSG XAC 


N300QA47 
N8000448 
N8G0D 449 
N8000 i+5D 


EQU 


AC3ERRf XACGIJ 


XACCl = ERROR C 
XACG2 = START 
XAGC2 = CURRENT 
XACC4 = INDEX T 
XACNFG = LENGTH 


OUNT SYSCDP 

OF HM SYSTEM DIRECTORY 
INDEX SYSCOP 

0 FIRST MM ENTRY SYSCOP 

OF SYSTEM DIRECTORY 

SYSCOP 


2^ 0N8fl00451 
N 80 0 0 45 2 
2. QN8000 453 
2. 0N80QD454 
N8000455 
2,0N8000456 


0 45-8 
0459 

P0181 

C8 65 

^ » , 
AC3 

LDA^ 

» 

XACC4 

0460 

P0182 

885C 

AC31 

ADO'«^ 

AC3DI X 

0461 

P0183 

68 5C 


STA» 

AG3TP 

0462 

P0184 

0C15 


ENQ 

AG3TBL 

0463 

P0185 

CA 41 

AC312 

LDA* 

AC3JBT, Q 

0464 

P0186 

B859 


EOR* 

AC3TP 

0465 

P0187 

0103 


SAZ 

AC314 

0466 

P0188 

0 D F£ 


INQ 

-1 

0467 

P0189 

0171 


SQM 

AC314 

0468 

P018A 

18FA 


JMP» 

AC312 

0469 

0470 

0471 

P018B 

C859 

AC314 

LDA» 

XAGC2 

0472 

P018C 

8852 


ADO’^ 

AC30IX 

0473 

PQ18D 

5101 


RTJ- 

LDA,I 

0474 

PS18E 

<QF£2 


LLS 

2 

0475 

P018F 

OF 46 


ARS 

6 

0476 

P0190 

A0Q6 


AND- 

6 

0477 

P0191 

5 8 AC 


STA* 

AC30TPH-1 

0478 

P0192 

CF62 


LRS 

2 

0479 

P0193 

A031 


AND- 

$31 

0480 

P0194 

0101 


SAZ 

AC314B 

0481 

P0195 

1629 


JMP» 

AC518 

0482 

P0196 

C847 

AC314B 

LDA’s^ 

AC30TPf 1 

0 48 3 

P0197 

0163 


SQP 

AC315 

0484 

0485 

P0198 

09FB 


INA 

-4 


MATCHES 

NO MATCH, Q MINUS 
CONTINUE . 

Q HAS TABLE INDEX 

GET FIRST WORD 
TEMPORARILLY PUT 

MASK OUT REQ PRI . 

0 BIT BACK TO A 


NOT JP MODULE 

FOR JP MODULE 
D BIT IN Q 


» N80QQ458 

SYSCOP 2.GN8000459 
N800 0460 
N8G0Q461 
N8009462 
N8000453 
N8000 464 
N80Q0465 
N8QQ0 466 
SYSCOP 2.0N8000467 
N8 00 0 468 
N8000469 
N8000470 
N800 0471 
N80C 0 472 
N8000473 
SYSCOP 2.0N8S00474 
SYSCOP 2.0N8000475 
N6000476 
N8O0O477 
SYSCOP 2. 8N800Q 478 
SYSCOP 2=.ON8G00479 
SYSCOP 2,QN8000480 
SYSCOP 2,QN8D00481 
SYSCOP 2.0N8000 48Z 
N8000433 
N800 0484 
N8000485 


DONT CHECK IF PARTITION CORE ENTRY 
GET REQUEST PRIORITY 
JP MODULE 
NOT JP MODULE 


'^‘SYSTEM DIRECTORY CHECKING 
A=INDEX TO FIRST MM ENTRY 
THIS INDEX 

CHECK IF IN JP TABLE 
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P0199 
PO 19A 
P019B 
PQ19C 
P0190 
P019E 
P019F 
PQIAO 
POlAl 
P01A2 
P01A3 
P01A4 
P01A5 
PfllA6 
POl A7 
P01A8 
P01A9 
POIAA 
POIAB 
PfllAC 
POIAD 

POIAE 

POIAF 

PfllBO 

POIBI 

P0182 

P01B3 

P01B4 

P01B5 

P01B6 

P01B7 

P01B8 

P0189 

POIBA 

PDIBB 
POIRC 
PDIBD 
POIBE 
PGIBF 
PO ICO 
POICI 
P01C2 
P01C3 
PD 1C4 
P01C5 

P01C6 

P01C7 


013F 
1824 
ODFE 
017A 
0 9FE 
ODFE 
0177 
0 9FE 
OOF7 
0174 
09FE 
0DF8 
0171 
09FE 
0111 
1816 
OAOA 
510F 
C838 
0114 
0836 

OA OQ 

aci6 

5105 
C820 
0 8 42 
30 05 
0901 
6827 

0A5C 
0C28 
510D 
00 02 
0 0 oc 

0A12 
0C24 
5105 
G3 20 
0907 
681E 
9821 
0121 
ISBD 
OCOl 
ICRA 

7FFF 
00 01 
7FFF 
00 02 


AC315 


AC316'. 

AC317' 


SAM AC317 
JMP^ AC318 
INQ -AC3JT0 
SQM AC316 
INA -1 

INQ -AC3JT19-AC3JT0 
SQM AC316 
INA -1 

INQ -AC3JT2 =l-AG3JTl 
SQM AC316 
INA -1 

INQ -AC3JT3 «-AC3JT2 

SQM AC316 

INA -1 

SAN AC317 

JMP’f AG318 

ENA ACMYN-XACN 

RTJ- GMStI 

LOA'» AC3ERR 

SAM AG3171 

RAO'^ AC3ERR 

LISTIT ACM4 


AC3171 


ERROR 
NO ERROR 
JP MODULE 


NO ERROR-CHECK IF DONE 
ERROR FOUND 


OUT ALL REAsDY 


LOA» 

GLR 

D\/I- 

INA 

STA» 


AC30IX 

Q 

5 

1 

AC30TP 


CONSTR 2,AC30TP,ACH5V1- 


LISTIT ACH5 


AC318 


AG319 


AC3JBT 


LO A--» 

INA 

STA'» 

SUB^ 

SAP 


AC3DIX 

7 

AC3DIX 

XACMFG 

AC319 


JMP» AC3 


ENQ YACN-XACN -EXIT 

JMP^ ifXAG) 

JOB 

AOC LOADSO 

EQU AC3JfO{»-AC3jeT) 

ADC JOBENI 

EQU AC3JTlt»-AG3JBT') 


PROCESSOR INDICES 


■AC3J BT) 


I 


N800 0 486 
N3000487 
N8000488 
N8000489 
N300049D 
N3000 491 
N8000492 
N8Q00493 
N8000494 
N8000495 
N8000496 
»»MSOS 4.1»»N3000 497 
»*HSOS 4.i»^N8000 498 
**MSOS 4-l*»N80fl0499 
N8G0050D 
N30Q0501 
N80Q0502 
N80Q0503 
N8000504 
N80Q0 505 
N80Q0506 
N8000 507 


N300 0 50 8 
N8000 509 
N80B0510 
N800D511 
N800G 512 
N8000 513 


C) 

o 

o 

o 

o 

o 

o 

o 

o 

o 


N8000 514 


N80Q0515 
N8000 516 
N8000517 
N8000518 
N8000 519 
SYSCOP 2.flN8090520 
SYSCOP 2. 0N80fl0521 
N8000522 
N8000523 
^'S^MSOS 4.0N8000524 
N8000 525 
N80Q0526 
N8000527 



O 

O 

O 

o 

o 

o 

o 
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o 

o 

o 

o 

o 

o 

o 

o 


0526 

P01C3 

7FFF 

X 

ADC 

PQ1C9 

7FFF 

X 



POICA 

7FFF 

X 



POICB 

7FFF 

X 


0529 

POICC 

7FFF 

X 

ADC 


POICD 

7FFF 

X 



POICE 

7FFF 

X 



POiCF 

7FFF 

X 


053 0 


COOA 


EQU 

0531 

POIDO 

7FFF 

X 

AOC 

POIDI 

7FFF 

X 



P01O2 

7FFF 

X 



P01D3 

7FFF 

X 

ADC 

0532 

P01D4 

7FFF 

X 


P01O5 

7FFF 

X 



poioe 

7FFF 

X 

EQU 

0533 


0011 


0534 

P01D7 

7FFF 

X 

ADC 


P01O8 7FFF X 
P01O9 7FFF X 
POIDA 7FFF X 
POlOB 7FFF X 

0535 0015 EQU 


0536 

D537 POIDC 0G02 

0538 POIDE OOGO 

0539 PBIDF 0000 


9 - 

BIS 

AC3DIX NUM 
AC3TP NUM 


J08PRO, JPLOAOtJPCHGE, JPT13 


JCRDVA, JLG0V4, JPST1i/4,REST0R 


AC3JT2f»-AC3JBT) 

PR0T£C,LIBEDT,RC0VER,3RKPT 


JPFLy4,NAME¥4,AFILV4 


AC3JT3{»-AC3JBT*) 

EFLIST, EFST0R,TDFUNC,MIPR0,00E8UG 


AC3TB1( »-AC3JBf-n 

AC30TP! 2) 

0 

0 


O 05i*l POIEO 0000 BZS XACFILI SEGSIZ-* + XAC1 

O 


o 

o 


o 

o 

I O 

o 


N3000 528 


»5^MSOS 4.0N8000529 


N80C0530 
»»MS0S 4.1*»N80Q0531 


♦»MS0S 4.1»»N8000532 


»»MSDS 4»1»»N8000533 
-»^»MS0S 4* 1»»N800 D534 


N80D0535 
N3000536 
N800 0537 
N8000538 
N30QO 539 


N80Q0541 


C": 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


n 



N8000543 
N6000544 
N800 0 545 
N800 Q 546 


N8GDQ548 
N80D0549 
N8000550 
N8000551 
N8fiOa552 
«^»HSOS 4. 0N8C0G553 
»»HSOS 4*0N8000554 
♦=*^MSOS 4. 0N80G 0555 
»^HSOS 4*0N8000556 
»=>^MSOS 4*ON8000557 
■»MSOS 4, ON800Q558 
N800J3559 
N8000560 
N8000 561 
N8COQ562 
N8000563 
N800 0564 
N8000565 

SYSCOP 2.0 N8009566 
NSe0Q567 
N800Q 568 
N8G8Q569 
N8000570 
N8000571 
N80Q0572 
SYS 2.0 N8000573 

N8C00574 
N80Q0575 
N8000576 
N800B577 
N8000578 
N80U0579 
N800056D 


n 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


r.n.'^Rn 
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N8000581 
M8 00 0 58 2 
N80Q0583 
N8000584 
N800 0 585 
N800058& 
N8000587 
N8000588 
N8DG0589 
N300059D 
N8D00591 
N8CG0592 
N80QQ 593 
N800 0594 
N8QQ0595 
N80Q0596 
N8000597 


N300Q 598 
N80D0599 
N80OO6OO 

Nsaooeoi 

N3Q0 0 602 
N300 0603 


N8000604 


N8Q006D5 

N8000606 

N80006fl7 

N80Q0608 

N800Q609 


N8000611 


O 

O 

O 

o 

o 

o 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 
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0613 




N80Q0613 

061^ 


* 

JOB PROCESSOR ANALYSIS 

NSC00614 

0615 


» 


N8000615 

0616 

0616 

02 40 

p 

STRTSG JP 

NSQOOolb 

0616 

0 0 06 




061 6 

02AO 

p 



0616 

02A1 

p 



0616 

G2A2 

p 



0616 

02A3 

p 



0616 

02A4 

p 



G616 

02A5 

p 



0616 

02A6 

p 



0516 P0240 

ooco 





061 8 





GO GET VALUES FOR CHECKING 

N80Q0618 

0619 

P0241 

aco6 

JP2 

END JP2ATL-1 


N300Q619 

0620 

PQ242 

CA44 

JP21 

LDA» JP2AT,Q 


N800062Q 

0621 

P0243 

5101 


RTJ- LOA,I 


N800 0621 

0622 

PQ244 

6A42 


STA^ JP2AT,Q 


N8000 622 

0623 

P0245 

ODFE 


INQ -1 


N800Q 62 3 

0 62 4 

P0246 

0171 


SQM JP220 


N800 0 62 4 

0625 

P0247 

18FA 


JMP’^ JP21 


N300Q625 

0626 

P0248 

0A09 

JP220 

ENA JPHXN-JPN 

GET MESSAGE BLOCK 

N8000626 

0627 

P0249 

510F 


RTJ- GMSfl 


N8QD0627 


0629 




» f » 

♦CHECK SWAP STATUS ♦ 



¥ 


♦ N80G0629 

0630 

P024A 

C B 30 

JPZ2 

LDA^ JP2SSW 

WAITING TO SWAP 





N8QB063a 

0631 

P024B 

OlOA 


SAZ JP23 

NO 





N30Ga63i 

0 63 2 

P024C 

C8 '3A 


LOA"f JP2UPI 

YFS 





N8000632 

0633 

P024D 

883C 


ADD^ JP2UPT 

WAITING FOR UNP.I/0 

TO COMPLETE 



N80Q0&33 

0 63 4 

P024E 

Q1 04 


SAZ JP221 

NO 





N3D0Q534 

0635 





POSSIBLE I/O HANGUP 





N800 0635 

0636 




LIST IT JPffl 






N8000636 

0636 

P024F 

OAIO 









0636 

P0250 

0 016 . 









0636 

P0251 

5105 









0637 

P0252 

16 0 4 


JMP* JP23 






N80Q0637 

063 8 





SWAP RATE HIGH 





Na000638 

0639 



JP221 

LISTIT JPM2 






N8000639 

0639 

PG253 

OAOE 









0639 

P0 25 4 

0C27 









0639 

P0255 

51D5 









C64Q 





SWAPPED 





N8CQ0640 

0641 

P0256 

C834 

JP2 3 

LOA» JP2SP0 

SWAPPED WITH JP IN 





N8000641 
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Q 

O 

o 


0642 P0257 0106 

0643 P0258 C830 

0644 PD259 0104 

0645 

0646 

0646 P025A OAll 
0646 P025B 0C36 

0646 P025C 5105 

0647 P025D 1815 


SAZ JP3 
LDA» JP2FI1 
SAZ JP3 

LISrU JPM3 


JMP» JP331 


MO 

NO 


O 


o 

o 

o 

o 

o 

o 


0649 

0650 P025E C82C 

0651 P025F 0104 

0652 

0652 P0260 0A09 
0652 P0261 0048 

0652 P0262 5105 

0653 PD263 180A 
0 65 4 

0655 P0264 0823 

0656 P0265 0104 

0657 

0657 P0266 0A13 
0657 P0267 0052 

0657 P0268 5105 

0658 P0269 1804 

0659 

0660 

0660 PQ26A 0AQ9 
0660 P026B 0C52 

0660 P026C 5105 

0661 
0662 


» » » » 
JP3 LOA^ JP2SP0 
SAZ JP31 
LISTIT JPM4 


JMP» JP33 

JP31 LOA^ JP2SSW 
SAZ JP32 
LISTIT JPM6 


JMP^ JP33 

V- 

JP32 LISTIT JPM5 


» 


» ^SWAP STATUS 
NOT SWAPPED 

WAITING 

NO 

SWAPPED NOT 
JP IN CORE 


* ^ * 


WAITING 




o 


o 

o 

o 


0664 P026D C81B 

0665 P026E 0105 
066 6 

0666 P026F OAO? 
0666 P0270 0C6E 

0666 P0271 5105 

0667 P0272 OCOl 

0668 DQ273 ICCC 


JP33 LDA^ JP2FI1 
SAZ JPll 
LISTIT JPM8 


JP331 ENQ, WJPN-JPN 
JMP» (JP) 


JP IN CORE CHECK 


JP IN CORE CONTINUE CHECKS 




N8000642 

N300Q643 

N8DQfl644 

N80Q0645 

N80Q0646 


N3GQ0647 


» » N8000649 

N80QC650 
N80Q0651 
NSQQQ652 


N8QQ0653 
N800 0654 
N80Q0 655 
N3000656 
N8G0 0 657 


N8 0 0 0 65 8 
N80Q0659 
N800 0t>60 


N80Q 0661 
N3000662 


N80a0664 
N8CD0665 
N8 0 0 0 66 6 


N8C0 0667 
N800 0 66 8 


o 

□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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0670 



V- 


* » 

0671 

0571 

P0274 

0A07 

JPII 

LISTI 

T JPM7 

0671 

P0275 

0C66 




0671 

P0276 

5105 




0672 

P0277 

C814 


LDA^ 

JF2MIB 

0673 

P0278 

OlOB 


SAZ 

JP113 

0674 

P0 279 

0 AOB 


ENA 

JPMZN-JPN 

0675 

P027A 

510F 


RTJ- 

GMS»I 

0676 

P027B 

C811 


LDA^ 

JP2MIX 

0677 

0678 

P027C 

0104 


SAZ 

JP112 

0679 




LISTIT JPME 

0679 

P027D 

OAIO 




0679 

P027E 

0C40 




0679 

P027F 

5105 




0680 

0681 

P028Q 

1804 


JMP* 

JP113 

0682 



JP112 

LISTIT JPMD 

0682 

P0281 

0 AGE 




0682 

P0282 

0C31 




0682 

0683 

P0 283 

5105 

’Of. 


XPRN-JPN 

0 68 4 

P0284 

0C02 

JP113 

ENQ 

0685 

PD285 

ICBA 


JMP^ 

(JP) 


^JP NOT IN CORE CHECKS 


NO INPUT PENDING 
GET MESSAGE BLOCK 

SEE IF FOR JP 
FOR JP 
FOR MIPRO 


FOR JP 


CONTINUE WITH PARTITIONS 




» N80D 

0670 

N800 

0671 

N800 

0672 

N8G0 

0673 

N80Q 

0 67 4 

N800 

0675 

N800 

0676 

N8G0 

0677 

N800 

0678 

N300 

0679 


N800 

0 

680 

N8D0 

0 

681 

N800 

0 

68 2 

N800 

0 

683 

N8 0D 

0 

684 

N80Q 

0 

685 


0687 


0286 

P 


EQU 

068 8 

P0286 

7FFF 

X 

JP2UPI 

ADC 

0669 

PQ287 

7FFF 

X 

J:P2-SS W 

AOC 

0693 

P0288 

7FFF 

X- 

JP2FI 1 

ABC 

■0591 

pa 2.8 9 

FF-FF 

X 

.JP2UPT 

ADC 

0692 

P826A 

' 5 0€3 

X 

JP2SP0 

AOC 

0693 

P028B 

7FFF 

X 

JP2MIB 

AOC 

0694 

P028C 

7FFF 

X 

JP2MI X 

ADC 

0695 


0 0 07 



EQU 


JP2AI (“ ) 

UNPIO 
SPA.SW 
FILEl 
UNPTIM 
SWA PON 
MIB 
MI RX 

JP2ArLI»-JP2AT5 


ADDRESS TABLE 


N8000687 
N8 0 0 0 68 8 
N3D0I3689 
N80G069Q 
N80D0691 
N8000692 
N8000693 
NSOO069L 
N8fl0 0695 


0697 P028O 0013 


EZS JPFIL (3EGSIZ-»+JP) 


N8G00697 
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0-69 9 
070 0 

*#■ 

JOB PROCESSOR ANALYSIS 

PARTK 

0701- 

0702 

♦ 

STRTSG WJP 


0702 

, 0 2 AD P ■ 



070-2 

• :00 07 



07,0 2 

.. 030,0' P 



07,0 2 

' 0301 P 



070 2 

. 0302 ?■ 



0702 

. , -0303 P 



0702 

8 30,% F , - 



0702 

■ 03 05 P . - 



070 2 

'• -03 06 P 



0702 

P02A0 GOOD 




N800 D699 
N30007QI] 
N880a701 
N8QQfl702 


07S-4 

0705 

P02A1 

SC-flS 

J -P4 . ■ 

ENQ 

JP4AfL-l 

GET 

REQUIRED 

VALUES 

0 78 6 

PQ2A2 

' G A -4 2 

J-P41 

LOA'» 

JP4AT,Q 




070 7 

P02A3 

5101 


Rf J- 

LDA,I 




070 8 

P02A4 

6A40 


STA» 

JP4AT ,Q 




0709 

P02A5 

ODFE 


INQ 

-1 




0710 

P02A 6 

0171 


SQM 

JP42 




0711 
071 2 

P02A7 

18FA 


JMP» 

JP41 


MESSAGE 

BLOCK 

0 713 

P02A8 

0 A09 

JP42 

ENA 

JPH7N-W JPN 

GET 

0714 

PQ2A9 

510F 


RTJ- 

GMS, I 





0716 




* 

^ ^ ^FTLE LOCATIONS 

071 7 
0717 

P 0 2 A A 

0 A 46 


CONSTR 

5,JP4FI1, JPM9V1 ,WJP ,1 

0 71 ■’ 

PQ2AB 

nC28 




C 7 1 7 

P0 2AC 

81. CD 




0717 

PO 2AO 

OC 06 




071 

0 7 1 8 

P02 

00 02 


L IS TIT 

j r-'H q 

0 7 1 fi 

PO 2AF 

3 A?2 




0 718 

F02B0 

0C16 




0 7 1 8 

P0 2B1 

-10 5 





Na000704 
N8 DO 0705 
N30QQ706 
NB0S0 707 
NaO0G708 
N8DQ0709 
N8GQ0710 
N8000711 
N8Q00712 
N8GQ0 71 3 
N80D0714 


N8 00 0 71 6 
N8QG0717 


N8&:j 3 718 


C 7 2 

0721 PQ2E2 G83A 


JPLOCK OUT SWITCH 
LDA- JP4SWT 


N 8 u 0 0 7 2 t ‘ 
H80G0721 


o 





C03PD 
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C' 

0^22 

P0 283 

0108 


SAZ 

JP44 

NO LOCK OUT 


G 7 2 3 

PG2B-^ 

0124 



JP4 3 

SIGN OFF 


0~2- 






LOCKOUT FOR LIB 

o 

072 5 




LISTIT JPHA 


0723 

P02B5 

0 A12 






0 72 5 

P02P5 

0C39 






0 72 5 

P02B7 

5105 





n 

0726 
072 7 

P0 2B8 

1804 

-v- 

JMP^ 

JP44 



072 8 



JP43 

LISTIT JPMB 



072 a 

P02B9 

0 A14 





o 

0726 

P02BA 

DC 4G 





072 8 
0729 

P02BB 

5105 







0730 

P02BC 

E829 

JP 44 

LDQ» 

JP4UPI 


o 

0731 

P02BD 

F830 


ADQ^^ 

JP4UPT 


0732 

P02BE 

01 51 


SQN 

JP45 

I/O NOT ACTIVE 


0 733 

P02BF 

1816 


JMP» 

JP46 


0734 

PO 2C0 

4830 

JP45 

STQ» 

JP4TP 

I/O ACTIVE GET STACK ADDRESS 

o 

0735 

P0 2C1 

C823 


LDA» 

JP4TRV 

0736 

P0 2C2 

09 OB 


INA 

11 

STACK ADDRESS 


0737 

P02C3 

5101 


RTJ- 

LDA ,I 



0733 

PG2C4 

6820 


STA» 

JP4TP+1 


o 

073 9 

P02C5 

0 AOA 

JP451 

ENA 

JPMZN-WJPN 


0740 

P02C6 

51 OF 


RTJ- 

GHS, I 



0741 




GO^'STS 2 , JP4 TP, 

jpMF+l , WJP, 22 


0741 

PC 2G7 

fj A 50 





o 

0 74 1 

PG2GR 

0 C17 





0 7 4 1 

P0 2r9 

510 0 






0 74 1 

l-OPbA 

; 0 n 2 






0*"4 1 

POPCP 

0 017 





o 

ij7L? 

P02CC 

C 3 2 0 


L D A ^ 

JPuSWT 


u ^ 4 

PQ2CD 

0124 


SAP 

J P H 52 

STACKED R7QUt-.ST3 


0 74 4 




LISTIT JPMF 


G ?4 4 

P (1 2 G P 

OA O'" 





o 

1^' J 41 

P0 2CF 

0C16 





074 4 

PQ 20 0 

51 C 5 






0 / 4 

po?ni 

1 8 Q 4 



JP4 h 



0 ? 4 6 



J P 4 5 2 

LISTIT JPMG 


o 

u 7 4 6 

P02D2 

0 A 1 A 





0 74 6 

PQ 203 

0C16 






0 7 4 6 
0 7 4 7 

00 2114 

5 1 0 5 

a- 



f : H t c K P 7 N ding K Q U f- „ S T S 

o 

0 74 8 

P02D5 

u A 0 A 

J P -1’ D 

ENA 

JPHZN-N JPN 


0749 

P02D6 

51 GF 


PTJ- 

GHS,I 



0 75 0 

P Q 2 n 7 

0817 


LDA» 

J P4 M I R 

P'^-NOIMG H'lUFSI 


0 751 

P02na 

0109 


SA7 

JP47 

NO 

o 

075 2 

PQ2D9 

C816 


LDA«‘ 

JP4MIX 

YES 

0753 
0 75 4 

P0 2DA 

0104 


SAZ 

JP461 

FOR MIPRO 



075 5 




LISTIT JPME 


o 

075 5 

PQ2DR 

OAIQ 





0755 

P02DC 

OC 40 






o 


o 


C) 


N8G0i] 72 2 
N 8 0 d 0 7 2 3 
N8G0 0 72-- 
N8Q0Q 723 


□ 

o 


N80 J 0 726 
N8QQ0 727 
N800 0 728 


NS0D0729 
N8G00730 
N8QQQ731 
N8000 732 
N8000733 
N8000734 
N8000735 
N8D0 0 736 
N8000737 
N8G0a 738 
N8G0Q739 
N3000 740 
M80G D7i*i 


o 

o 

o 

o 


o 


N80u 0 74 2 
N800 0 7^3 
M8G0 0 74.. 


o 


o 

NS 00 0 / 4.5 
N8 0 0 0 7-.b 

o 


N 8 G 0 0 7 4 7 
N8nno748 
MSdOO 7n9 
H 8 C 0 0 75 0 
N8BG 0 751 
N8 0a 0 752 
N8090753 
N8 00 0 754 
N8 00 0 755 


o 

o 

o 




o 

o 


o 

o 


o 


N800 0 756 
N800 0 757 


N800 Q 756 
^«^MSOS 4. ON800 0 759 
N80Q 0 760 


N800 0762 
N8 0 G u 763 
N 8 G Q 0 7 6 
N8 0 0 0 76 5 


N 8 CO 0 766 
N3C0 0 767 
NS OG 0 76 8 
N800G769 
NSaO 0 770 
N8CG077i 


N80G 0 77 3 


o 

o 

o 

o 

o 

o 

o 

C) 

o 

o 

o 

o 

o 

C) 

o 

o 


c..) 
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O 

o 

0775 




”r 



N800Q775 

O 


0 775 




■v- 

PRINT PARTITION THREADS AND AOOPr.SSES -^-MSOS 

0N8G0 0 776 



077 7 







N8C;b 0777 


o 

077 8 
077 8 


0 3 0 0 

D 


STRTSG XPR 


N80D0778 

O 


0^78 


0 0 08 








0 77 3 


Q 360 

P 






o 

077 8 


0 3 61 

P 





o 

0778 


0 3 62 

P 






077 8 


0363 

P 







0 77 8 


0 3 6i^ 

P 






o 

0778 


0 365 

P 





■ o 

0778 


0 366 

P 






077 8 

P03DO 

0 0 0 0 








077 9 

P0301 

GOOD 

X 


LDA --XPARTBL 

DON'T ANALYZE IF NO PARTITION CORE 

N3000 779 


o 


P0302 

7FFF 

X 




o 

078 0 

P0303 

BO 11 



EOR- $11 


N80Q078D 


0781 

P03G4 

0112 



SAN PI 


N8000781 



0782 

P0305 

OCOC 



FNQ NEXTN-XPRN 


N8G0G782 


o 

0787 

P03G6 

1CF9 



JMP» (XPR? 

EXIT 

N8000783 

o 

078 4 




■if- 


PRINT PARTITION GORE ADCRESSES 

N8000784 


078 5 

PG307 

OAOA 


Pi 

ENA PARXN-XPRN 

OUTPUT HEADER MESSAGE 

N800 0 785 



0786 

P0308 

510F 



RTJ- GMS,I 

GET MESSAGE BLOCK 

N800 0786 


o 

0787 

0787 

P0309 

OAOD 



LISTIT PARI 


N3000787 

o 


0787 

P030A 

QG16 








0787 

PD3CB 

5105 







o 

0788 

P03QC 

OCDD 



END 0 


N800 0786 

o 

D789 

P030D 

4844 



STQ^ INDEX 


N8G0 0789 


0790 

PD30 E 

CO 00 

X 

PIA 

LOA =XPART8L 

GET TABLE CONTENTS 

N8000 790 




P03DF 

0302 

X 





o 

0791 

P031Q 

0834 



AAQ A 


N803G791 

: o 

079 2 

P0311 

51GB 


P2 

RTJ- ATA,I 


N8G00792 


0793 

P0312 

4830 



STQ» PARTHP 

SAVE PARTITION NUMBER 

NSOOO 793 



0 79h 

P0313 

6830 



STA^ PARTHP+1 


N80C 0 794 


o 

0 79 5 

PQ314 

0900 



INA 0 

IS THIS AN UNDEFINED PARTITION 

N80G 0795 

■ o 

0796 

P0315 

Gill 



SAN P2A 

NO, CHECK ADDRESS 

N 8 0 0 0 7 9 6 


079 7 

PO 316 

1811 



JMP^ P3 

VFS, "XTT 

N80 0 0 797 



0798 

P G 3 1 7 

OAOA 


P2 A 

FNA PARXN-XPRN 

RFSTORc- .'I'SSAGt BUFFER 

N8D0 0 79 8 


o 

0 79 9 

P0 318 

51 OF 



RTJ- 6MS,I 


N60Q0799 

o 

08 0 0 
0 8 0 0 

P0319 

0 A i^F 


P2 5 

COMSTR 2, PARTHP, 

PAR?yi,XPR,l BUILD OUTPUT BUFFER 

N 8 C 0 3 8 0 0 




0 80 0' 

Pii31 A 

OCPA 







o 

u ri n Q 

1^0318 

51 OD 






; o 

0 8 0 0 

P031C 

0 0 02 







08 0 C 
0 80 1 

PQ31 n 

U G 0 2 



listit par? 

P‘*INT PARTITION ADDRE'^SFS 

N 8 0 0 0 8 01 


o 

0801 

P031- 

OA OA 





o 

080 1 

P031F 

QG2h 







0 -5 0 1 

Pu 320 

510 5 








0802 

PC 321 

0820 



LOA-^ NUMPAR 

OF PAkTITIOMS' 

N8QQ 0 80 2 


o 

03 0 3 

»0 32 2 

9 82F 



SUn^- INDF’X 


N 8 00 0 80 3 

o 

0 S u ^ 

P0 323 

010 3 



SAZ P3 


N8G0 0 8Gi^ 

o 









• o 

o 









■ o 


co3'^n 


PAG" 28 


DATE! GG/ 19/99 


Q805 P0324 0320 
080 n P0325 F82C 
0 30 7 P0 32 6 1 3F7 


kao-" index 

ton- INDEX 
JMP- PI A 


NBGOUSQF 
N d 0 u 0 3 0 5 
Nd CO G8G7 


0 80 9 







0 a 1 G 




d3 

LISTIT PAR 3 

0 81 0 

PC 32 7 

0 A OA 





0 8 1 G 

PO 328 

GC2F 





0810 

P0329 

51 05 





0 811 

PD32A 

OCOO 


P4 

EMO 

0 

0 812 

P032B 

4826 



STQ-'^ 

INDEX 

0813 

P032C 

48 23 


P5 

STQ^ 

PARTMP 

0814 

P032D 

GOOD 

X 


LOA 

=XTHOS 


P032=' 

7FFF 

X 




081 5 

P032F 

6834 



STA^ 

XPRCl 

0816 

P0330 

CO 00 

X 


LDA 

= XUSE 


P0331 

7FFF 

X 




0817 

PQ 332 

6832 



STA^ 

XPRC2 

0318 

P0333 

C830 



LDA=^ 

XPRCl 

0819 

P0334 

0834 



AAQ 

A 

0820 

P0335 

5101 



RTJ- 

LDA,I 

0821 

PQ336 

681A 



STA’^ 

PARTMPit-1 

0322 

P0337 

OIDD 



SAZ 

NOT HO 

0823 

P0338 

0 8 64 



TCA 

A 

0824 

P0339 

mil 



SAN 

PTHD 

0825 

P033A 

18QB 



JMP^ 

NOTHO 

0826 

PG33B 

OAOA 


PTHD 

ENA 

PARXN-XPRN 

0827 

PQ33C 

510F 



RTJ- 

GMS,I 

0828 





CONSTR 2,PARTMP 

082 8 

P033D 

0 A 4F 





0 82 8 

P033F 

0C2A 





082 8 

P033F 

51 OD 





08 2 8 

PQ 34 0 

00 02 





0828 

P0341 

0 0 02 





0829 





LISTIT PAR2 

0829 

P 0 3 42 

OAOA 





0829 

P03 4:i 

0C24 





0 82 9 

PQ3 44 

5105 





083 0 

PQ345 

08QC 


NUT HO 

RAO» 

INDFX 

QB31 

PQ 3u6 

G 8 0 B 



L D A^' 

INDF.X 

1- 11 J C> 

P n 3 4 7 

2822 



T R A 

Q 

0833 

P0 3 48 

9 8 Q 6 



SUP» 

NUMPAR 

0 83 4 

P0349 

Qini 



SAZ 


0 8 3 F 

o 0 34 A 

0121 



3A^’ 

P6 

0 8 3 f- 

PG 34 P 

i3Fn 


C, 

J p-^ 

P ^ 

08 3 7 

O0 34C 

Q C 0 1 


P 6 

FNU 

YPRN- XPRN 

083 8 

P034D 

1CR2 



JMP- 

(XPR) 

0 8 39 

p 0 3 4 P 

7FFF 

X 

NIUMPA R 

ADC 

LSTPRT 

Q 8 H- 0 

PLI34F 

G Q 0 2 


PAR IMP 

LZS 

PARI HP (2) 

08 4 1 

P0351 

0 0 0 1 


IHnpx 

nzs 

INDEX (1) 

' 8 4 2 

PO 752 

0 0 0 F 



BZS 

XFRFILC SEG 


PPIMT HEADER FOP, THREADS MESSAGtr 
PF'INT THRcADS MESSAGE 


SAVE PARTITION NUMDER 
ADDRESS OF THREADS TABLE 

ADDR OF THOS TABLE 
ADDRESS OF USE TABLE 

ADDR OF USE TABLE 
ADDR OF THREADS TABLE 
INDEX BY CORRECT PARTITION N01 
GET WORD FROM FAILED IMAGE 

PARTITION NOT USED 

ANYTHING THREADED 

NOTHING THREADED , CONTINUE 

FETCH OUTPUT MESSAGE 

PAR2V1,XPR,1 BUILD OUTPUT BUFFER 


PRINT THREADS CONTENTS 


f)nN-" 

ZFPO. no LAST PARTITION 

POG., FINTSHED 

Gi:. T NFXT SEGMENT 


7”"- + XPR > 


N H u 0 0 8 0 9 
N&aOQ81G 


N8GQ 0811 
N800Q 812 
N8GQQ81 3 
N80Q0814 

N8000 81 5 
N80Q 0 81 6 

N800 0 817 
N8DQ0818 
N30QG819 
N80Q 0820 
N8000821 
N8000822 
N8000823 
N8Q0 0824 
N8000825 
N80Q0 826 
N800Q827 
N800 0828 


N80Q0829 


N800083D 

N8000831 
M8 0u i‘; 33? 
M8000833 
N800 0 83-4 
N 8 0 i! G S 3 '? 
NBOn 0S3 g 
N 8e0 0 837 
M8 C 0 0 83 8 
N 8 G t'j 0 8 3 9 
N8{li: 0 840 
NGfjLG 341 
NoDT G3t2 
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DATE: 08/19/99 




u 

N3D0Gv8i^H 

o 

C-NSOPOBA:, 


N8OQ0 8-T& 


M3C0 0847 

^ o 


o 


o 

N8GD 0848 


N8 00 0849 

o 

N8000 850 

N8000851 



o 

N|8000852 


N800 0853 


N30Q 0854 

o 

N3000 855 

N80D 0856 


N8000857 


N8Ci00858 

o 

N80Q0359 

N8a0Q'868 


N 8000861 


NSG0Q862 

o 

N8000863 



: o 

N80i6864 



o 

N300B3&S 


Na0Cfl866 

o 

N8Q0aa67 

N80GQS68 


N 8,0.8 0869 


NSOGoaro 

o 

NSflOOSTi- • ■ 

N8000372 


N8000873 


N3000874 

■ o 

N8000875 


O 


O 
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DATE: Q6/19/99 


D87 6 
0677 

P038A 

0 0 02 

USETMP BZS 
» 

0878 

P0 386 

0001 

BZS 

0879 

P0367 

0001 

BZS 

0880 

P0388 

0 038 

BZS 


USETMP12) 

THDAQRM} ADDR OF THOS TABLE 

USEADRiO AnOR OF USE TABLE 

YPRFILi SEGSIZ-»+YPR) 


N800087& 

N80D0877 

N8000878 

N8000879 

N8000880 


083 2 

0883 

0884 

0885 
0885 
0885 
0885 
0885 
0885 
0885 
0885 
08 8 6 

0885 
0 885 

0886 
0 88 7 

0838 

0889 

0890 

0891 

0892 

0893 

0894 
0894 
9894 

0894 

0895 

0896 

0897 

0896 
0899 
09 0 0 
090 1 

0902 

0903 
090 4 
090 5 

0906 

0907 

0908 
090 9 

0909 
0909 

0909 

0910 

0911 

0912 

0913 

0914 

0915 

0916 


C03RD PAGE 31 







PARTITI G 




STRTSG PC 


03C0 
00 OA 

P 





0420 

P 





0421 

P 





0422 

P 





0 423 

P 





0424 

P 





0425 

P 





0426 

P 




P03CQ 

0 0 00 





P03C1 

GOOD 

X 

PCI 

LDA 

=XPAR7BL 

P03C2 

030F 

X 



P03C3 

5108 



RTJ- 

ATA ,I 

P03C4 

6838 



STA* 

GURPAR 

PQ3C5 

09FF 



INA 

-1 

PC3C6 

0125 



SAP 

PCll 

PD3C7 

0 A09 



ENA 

PCMN-PCN 

P03G8 

51 OF 



RTJ- 

GMS, I 





LISTIT PCMl 

PO 3C9 

0A16 





PG 3CA 

0G16 





PG3CB 

5105 





P0 3CC 

QCOl 


PCll 

ENQ 

1 

P03CD 

4831 


PC12 

STQ* 

PGIDX 

P03CF 

GOOD 

X 


LDA 

= XPARTBL 

P03CF 

B3G2 

X 



P0 3DO 

0634 



AAQ 

A 

P03D1 

51GB 



RTJ- 

ATA, I 

PQ3D2 

E820 



LDQ* 

CURPAR 

P0 3D3 

682C 



STA'^ 

CURPAR 

P03D4 

0900 



INA 

0 

P03O5 

Dill 



SAN 

PC13 

P03D6 

180F 



JMP» 

PCI 6 

P03D7 

5113 


PCI 3 

RTJ- 

CMP, I 

PQ3D8 

0126 



SAP 

PCI 5 

P03D9 

OA09 



ENA 

PCMN-PCN 

P03OA 

510F 



RTJ- 

GMS , I 





LISTIT PCM2 

P030B 

0A16 





P0 3DC 

0C2D 





P03DD 

5105 





P0 3DE 

18 07 



JMP» 

PC16 

P030F 

C81E 


PCI 5 

LDA=* 

NUMPRT 

P03E0 

981E 



suns^ 

PCIOX 

P03E1 

0103 



SAZ 

PC16 

P03E2 

D81G 



RAO* 

PCIOX 

P03E3 

E31B 



LOQ* 

PCIDX 

P03E4 

18E8 



JMP* 

PC12 


DATES 08/19/99 


CORE ANALYSIS 


3 CARDS DELETED 

CHECK PARTITION 0 GT 8000 


SA'lifE CURRENT PARTITION ADDRESS 

SKIP IF ADDR OK 

GET MSG BLOCK 
ILLEGAL PARTITION 0 


GET NEXT PC ADDR 

UPDATE CURRENT PARTITION ADDRESS 
IS THIS AN UNDEFINED PARTITION 
NOj CHECK ADDRESS 
YES, EXIT 
COMPARE 

SKIP IF PARTITION IN ORDER 
GET MSG BLOCK 


CHECK IF DONE 

AKIP IF ALL CHECKED 
UPDATE IF INDEX 


N8000aB2 

N80D0383 
N80 00884 
N800Q885 


N800G886 

N80Q0887 

N8000888 

N8D00889 

N8000890 

N8000891 

N800fl892 

N8C00893 

N8000394 


N80Q0895 
N800 0896 
N8QQ0897 

N80Q 0898 
N3000899 
N80009QO 
N3000901 
N80DS902 
N8G00903 
N3000904 
N8000905 
N8G08906 
N8000907 
N3GQ09G6 
N800 0909 


N300 0910 
N8Q009il 
N800D912 
N8B00 913 
N80G0914 
N8D00915 
N8000916 


C03RD 


PAGE 3E 


DATES 08/19/99 


L.-' 

O 

O 

o 

o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


0917 

0918 

0919 

0920 

0921 

0922 

0923 
D92h 

0925 

0926 

0927 

0928 

0929 
093 0 

0931 

0932 

0933 

0934 

0935 

0936 
0936 
0936 

0936 

0937 

0938 

0939 

0940 

0941 

0942 

0943 


P03E5 
P0 3E6 
PD3E7 
PQ3E8 
P03E9 
P03EA 
P03E8 
P03EC 
P0 3ED 
P0 3EE 
P03EF 
P03F0 
P03F1 
P03F2 
PQ3F3 
PQ3F4 
P03F5 
P03F6 
P03F7 

P03F8 

P03F9 

P03FA 

P03FB 

P03FC 

P03FD 

P03FE 

P03FF 

PQ400 

P0401 


CO 00 
7FFF 
510B 
C822 

0 8 44 

01 53 
OAIO 
6814 
18 05 
OF 61 
0132 
D810 
18FC 
G80B 
0901 
930C 
0105 
0A09 
510F 

flA16 

0C44 


PC16 

LOA 

=XBUSY 


RTJ- 

ATAtl 


TRA 

Q 


CLR 

A 


SQN 

PC17 


ENA 

16 


STA^ 

BSYBIT 


JMP» 

PCI 8 

PC17 

LRS 

1 


SAM 

PCI 8 


RAO^ 

BSYBIT 


JMP’^ 

PC17 

PC18 

LDA^ 

NUMPRT 


INA 

1 


SU8» 

BSYBIT 


SAZ 

PC20 


ENA 

PCHN-PCN 


RTJ- 

GMS, I 


ADOR OF BUSY INDICATOR 

BUSY INDICATOR TO 0 
Q=0, CHECK IF 16 PARTITIONS SPECIFIED 


UPDATE PARTITION COUNTER 


LISTIT PCM3 


05 

OA 

PC2Q 

END 

NEXTN-PCN 

C3 


JMP^ 

(PC) 

82 

X NUMPRT 

ADC 

LSTPRT 

01 


BZS 

PCTDX (1) 

101 


BZS 

CURPAR^ 1) 

01 


BZS 

aSYBITJll 

IF 


BZS 

PCFIL {5EGSIZ- 


SKIP IF BIT COUNT OK 


ILLEGAL BUSY INDICATOR 


GET NEXT SEGMENT 
NUMBER OF PARTITIONS-1 

CURRENT PARTITION AODR 

»+PC) 


N30Q0917 
N8000 918 


N800 

N30Q 

N8QQ 

N800 

N800 

N300 

N60Q 

N300 

N800 

N800 

N800 

N800 

N800 

N8Q0 

N8GQ 

N800 

N8D0 

N8GQ 


0 919 

0920 

0921 

0922 
0 923 
0924 
0 92 5 
0926 
0 927 
0928 
Q 929 
0 93 0 

0931 

0932 

0933 

0934 

0935 

0936 


N800 

N800 

N800 

N8fl0 

N800 

N800 

N8Q0 


0937 

0938 

0939 

0940 

0941 

0942 

0943 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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date: 06/19/99 


o 


( _) 

o 

o 

o 

o 

o 

o 

o 


o 


o 

o 


o 


o 


o 

o 

o 


09A5 

09A6 

0947 

0948 
0948 
0948 
0948 


0 420 
0420 P 
OGOB 


SCHEDULER STACK MESSAGES PART X 
STRHSG SSHX 


0950 



0950 


0016 

0950 


0420 

0950 

P0420 

0 0 01 

0950 

P0421 

2A2A 


PQ422 

2A20 


P0423 

53 43 


P0424 

48 45 


P0425 

4455 


P0426 

4C45 


P0427 

5220 


P0428 

5354 


P0429 

41 43 


PD42A 

4B20 


P0 42B 

4552 


P042C 

524F 


PQ42D 

5220 

0950 


GOOD 

0951 



0952 



0952 


0 0 24 

0952 


042E 

0952 

P0 42E 

0 8 02 

0952 

P042F 

4E55 


P0430 

4D2Q 


PO 431 

4F46 


PQ432 

2 0 53 


P0 433 

4348 


P0434 

4544 


P0435 

4G2B 


P0436 

5354 


P0437 

4143 


P0438 

4B20 


P0439 

454E 


P043A 

54 52 


P043B 

4945 


P043C 

5320 


P043D 

5741 


P043E 

5320 

0952 


C035 

0952 

P0 43F 

3132 


P0440 

20 00 


MES5AG SSMX,SSMl,l5*»*^ SCHEOUiER STACK ERRORS ,0 


MESSAG SSMX, SSH2,2, *NUM OF SCHEDL STACK ENTRIES WAS ',1, 
MESSAG *12 JRNUM OF SCHEDL CALLS STACKED WAS *,1,»12*,D 


N80Q0945 

O 

N8000946 

N8000947 

N8000948 

O 


O 

N800G950 

o 


O 


o 


o 


o 

N3000951 

N8000952 

o 


^ o 


o 


o 


o 


o 


o 


o 


O 
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34 


DATE 


08/ 19/99 


0952 

0952 

0952 

0953 
0953 
0953 
0953 
0953 


0953 

0954 
0954 
0954 
0954 
0954 


0954 


P0 441 4E55 
P04'42 4D20 
P0443 4F46 
P0444 2053 
P0445 4348 
P0446 4544 
P0447 4C20 
P0 448 43 41 
P0449 4040 
P044A 5320 
P0448 5354 
P044C 4143 
P044D 4B45 
P044.E 4420 
P044F 5741 
P0450 5320 
0 0 47 
P0451 3132 
0 0 23 

HESSAG SSMX,SSM3,2,»SCHE0L STACK ENTRIES', 0 

a 0 48 
0 4 52 P 
P0452 0002 
P0453 5343 
P0454 4845 
PD455 444C 
P0456 2053 
P0457 5441 
P0458 434B 
P0459 2045 
P045A 4E54 
P045B 5249 

P045C 4553 ■ ^ 

HESSAG SSHX, SSM4, ?,»1234/ 1234 1234 1234 1234*, G 

0 0 53 . 

0450 P 
P045O 0002 
PG45E 3132 
P045F 3334 
P0460 2F20 
PQ461 3132 
P0462 3334 
PG463 2020 
P0464 3132 
P0465 3334 
P0466 2020 
P0467 3132 
P0468 3334 
P0469 2020 
P0 46A 3132 
P046B 3334 
DODE 


N8000953 


N80G095H 
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DATES 08/19/gg 


^ 0955 P046G 001^ BZS SSMXFL( SEGSIZ-’^a-SSHXl 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


N8000955 


O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATES 

08/19/99 

0 

0 957 






0958 

» 

SCHEDULER STACK 

MESSAGES PART 

Y 

o 

0959 
096 0 


STRHSG SSMY 



0960 

0480 





0960 

0480 P 





0960 

OOOC 





o 


N8000957 
N80QD958 
N800 0959 
N800096G 


L.) 

O 

O 

o 


o 

0952 

0963 



o 

0964 

0964 


0016 

0964 


0480 


0964 

P0480 

0 0 02 


0964 

P0 481 

4C41 

o 


P0482 

53 54 


P0483 

2 0 45 



PO 484 

4E54 



P0465 

52 59 

o 


P0486 

2054 


P0487 

4F20 



P0488 

4245 



PD489 

20 53 

o 


PD48A 

43 48 


P046B 

4544 



P0 48C 

554C 



P048D 

4544 

o 


P048E 

20 DD 

0964 


0025 


0964 

P048F 

3132 



P0490 

3334 



PC491 

2F20 


P0492 

31.32 

j O 


P0493 

3334 



P0494 

2020 

o 


P0495 

3132 


P0 496 

3334 



P0497 

2020 



P0498 

3132 

o 


P0499 

33 34 


P049A 

2020 



P049B 

3132 



P049C 

3334 

o 

0964 

0965 

0966 


00 1C 


0966 


0 0 33 

o 

0966 


Q49D 

0966 

P049D 

0001 

o 




o 





FOLLOWING CARD CHANGED 

MESSAG SSHV^SSN5,2, 'LAST ENTRY TO BE SCHEDULED ,?RSlt 
MESSAG *1234/ 1234 1234 1234 1234*., 0 


HESSAG SSHT, SSM6,1, 'THERE WERE *,1,»1234 OF THE *.,1., 
MESSAG *1234 VOLATILE WORDS ASSIGNED*, 0 


N300G962 

N8000963 

N80QG964 


N800D955 
N8000 966 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATE? 08/19/99 



0966 


O 

0966 

0966 


O 

0966 

0966 

o 


o 


o 


o 0966 

0967 

o 


o 


P049E 54-43 
P049F 4552 
PQ4A0 4520 
PQ4A1 5745 
PD4A2 5245 
P04A3 2Q20 

003A 
P04A4 3132 
P04A5 3334 
P04A6 204F 
P04A7 4620 
P04A8 5448 
P04A9 4520 

0 0 40 
P04AA 3132 
P04AB 3334 
P04AG 2056 
PD4AD 4F4G 
P04AE 4154 
P04AF 494C 
P04B0 4520 
P04B1 574F 
P04B2 5244 
P04B3 5320 
P04B4 4153 
P04B5 5349 
P04B6 474E 
P04B7 4544 

aoiA 

P04B8 0028 


O 

O 

i ^ 

o 

o 


BZS SSHYFLISEGSIZ-=*+SSHY} 


o 


□ 

o 

o 

o 

o 

o 

o 

o 

N800Q967 

O 

o 

o 

o 

o 

o 

o 

o 


o 







L.--' 
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o 

0959 



&■ 


N8000969 

o 


0970 




ALLOCATABLE CORE MESSAGES PART X 

N8000970 



0971 





N8000971 


o 

0972 

0972 


04E0 


STPMSG ACHX 

N3Q00972 

o 


0972 


04E0 

P 





0972 


0 0 OD 





o 







o 

o 

0974 

0974 


0016 


MESSAG ACHX, ACH1,1,*^^»’^ALL0CATABLE CORE ERROR*, 0 

N80Q0974 

o 


0974 


04E0 

P 




o 

0974 

P0 4EO 

00 01 




o 

0974 

P0 4E1 

2A2A 






P04E2 

2A41 







PD4E3 

4C4C 





o 


P04E4 

4F43 




o 


P04E5 

41 54 






P04E6 

41 42 







P04E7 

4G45 





o 


P Q 4E8 

2043 




o 


P04E9 

4F52 






P 0 4£ A 

4520 







P04EB 

45 52 





o 


PG4EC 

524F 




o 

0974 

0975 

P04ED 

5220 

OOOD 


MESSAG ACHX, ACM2,2, 

N8000975 ‘ 





o 

0976 

0976 


0 0 24 


MESSAG *ALLOCATABLE CORE MAP IRINDEX START LNGTH TMRD DUMP',S 

N80QQ976 

o 


0976 


04EE 

P 





0976 

P,0 4EE 

OB 02 





o 

0976 

P0 4EF 

414C 




o 


Pa4F0 

4C4F 






PD4F1 

43 41 







P04F2 

5441 





o 


PO 4F3 

424C 




o 


PQ4F4 

4520 






P04F5 

43 4F 







PG4F6 

5245 





o 


P04FF 

204D 




o 


P04F8 

4150 






P04F9 

2Q OB 







PQ4FA 

494E 





o 


P04FB 

4445 




o 


PO 4FG 

5820 






P04FD 

5354 







P04FE 

41 52 





o 


P04FF 

5 4 20 




o 


P05QO 

4C4E 






PO 501 

4754 





o 







o 

o 







o 
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o 


P0502 

4820 



O 



P0503 

5448 






P05Q4 

52 44 



o 

o 


P0505 

20 44 




P0506 

55 4D 





P0507 

5020 




o 

0976 

0977 


0019 

MESSAG ACHX, ACH3,25*EMPY *,1, 

N800 0977 

o 

0978 

0978 


0D3E 

HESSAG *1234 1234 1234 1234 1234 1234 1234 1234S0 

N8CQ 0978 




0 97 8 


0508 P 



o 

o 

0978 

P0508 

00 02 



0978 

P0509 

454D 





P05DA 

5 0 59 






P050B 

2020 



o 

o 

0 97 8 


0 0 42 



0978 

P0 50C 

3132 





PO5O0 

3334 






P050E 

2020 



o 

o 


P05DF 

3132 




P0510 

3334 





P0511 

2020 






P0 512 

3132 



o 

o 


P0513 

3334 




PQ514 

2020 





P0515 

3132 






P0516 

3334 



o 

o 


P05i7 

2020 




P 0 51 8 

3132 





P0 519 

3334 






PQ51A 

2020 



■ o 

o 


P051B 

3132 




P0 51C 

3334 





P051O 

2020 






PD51E 

3132 



o 

o 


PQ51F 

3334 




PD520 

2020 





P0 521 

3132 






P0522 

3334 




o 

0978 

0979 

P0523 

OOIA 
0 0 10 

BZS ACHXFLCSEGSIZ-’^^ACMXl 

Na000979 

■ o 


o ' o 


O ' o 

o O 

O o 

O o 


o 


o 
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( _) 


0981 



0962 


if- 

0983 



0984 

0984 

0 5 40 


0964 

0 5 40 

P 

0984 

OOOE 



o 


ALLOCATABLE CORE MESSAGES PART Y 
STRMSG ACM'Y 


N800D981 

N8000982 

N8000933 

N8000984 


□ 

O 

O 


o : 

0986 

0986 


0016 


0986 


0540 

o 

0986 

P0 540 

0 0 01 

0986 

P0541 

2A2A 



P0 542 

2A53 



P05 43 

59 53 

o 


PD544 

5445 


P0545 

40 2 0 



PD546 

4449 



PD547 

5245 

o 


P0548 

4354 


P0549 

4F52 



P054A 

5920 



PO 54B 

4552 

o : 


P054C 

52 4F 

0986 

0987 

P054D 

5220 

OflOD 


o 

0988 

0988 


0024 


0 98 8 


0 5 4E 


0988 

P0 54E 

00 Q1 

o 

0988 

P054F 

4 9 4E 

PD550 

4445 



PQ551 

5820 


0988 


OD 28 

o 

0988 

P0552 

3132 


P0553 

3334 



P0554 

2Q48 



P0555 

41 53 

o 


P0556 

2D 49 


P0557 

4E56 



P0558 

41 4C 



P0559 

49 44 

o 


P055A 

2 0 52 


P055B 

4551 



PD55C 

2050 



P055D 

5249 

o 


PO 55E 

2020 

0988 


0 035 


MESSAG ACHY, ACM 4fl,*»-*^'"S'YST£M OIRECTORY ERRORS, 0 


N8000986 


MESSAG ACM'Y, ACH5,l,»INn'EX ',1, *1234 HAS INVALID REQ PRI %1, 
MESSAG *1234*, 0 


N8000987 

N800D988 


O 

o 

o 


o 


o 

o 

o 

o 

o 

o 

o 


o 


o 


o 


o 
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0 988 

P0 55F 

3132 




P0560 

33 34 



0988 

0989 


0012 

MESSAG ACHY, AGM6,1, ’INDEX %1,’1234 TOO LONG FOR REQ PRI «,1, 

N8000989 

0990 

0990 


0 037 

MESSAG *1234', 0 

N8QC0990 

0990 


0 5 61 P 



0990 

P0561 

0 0 01 



D99D 

P0562 

494E 




PQ563 

4445 




PD564 

5820 



099D 


0 03B 



D99C 

P0565 

3132 




P0566 

3334 




PQ567 

2 0 54 




PD568 

4F4F 




P0569 

204C 




P056A 

4F4E 




P056B 

4720 


* 


P056C 

464F 




P056O 

5220 




P056E 

5245 




P056F 

5120 




P0570 

50 52 




P0571 

4920 



099D 


0 0 4B 



0990 

0990 

0991 

P0572 

P0573 

3132 

3334 

0012 

002C 



P0574 

BZS AGMYFLISEGSIZ-»+ACHY? 

N800Q991 
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05 AO 
05A0 
OOOF 


JOB PROCESSOR MESSAGES PART X 


STRHSG JPMX 


N800D993 

N8000994 

N8000995 

N8DQ0996 


P05AO 
PO 5A1 
P0 5A2 
P05A3 
PG5A4 
P05A5 
P05A6 
P.05A7 
P05A8 
PQ5A9 
P05AA 
P05AB 
P05AC 
P0 5AD 
P0 5AE 
P05AF 
P05B0 


P05B1 
P05B2 
PC5B3 
P05B4 
P05B5 
P05B6 
P05B7 
P05B8 
P05B9 
P05BA 
P05BB 
P0 58C 
P05BD 
PQ5BE 
P05BF 


0 016 
05 AO 
0001 
43 4F 
4E53 
4944 
4552 
2055 
%E50 
52 4F 
5445 
43 54 
4544 
2 0 49 
2F4F 
2048 
414E 
4755 
5020 
0010 

0027 
05B1 
00 01 
43 4F 
*+E53 
4944 
4552 
2 0 53 
5741 
50 20 
5241 
5445 
2054 
4F4F 
2052 
4150 
4944 
OOOE 


MESSAG JPMXt JPMl , 1 5 •CONSIDER UNPROTECTEO I/O HANGUP*, 0 


N800Q998 


MESSAG JPHX, JPM2,1 ,*CONSIDER SWAP RATE TOO RAPIOSO 


N8G00999 


MESSAG JPHX, JPM3,1 ,"‘CORE USAGE CAUSED SWAP WHILE JP IN*,0 


N8001000 
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G 

1000 


0036 


loco 


O5C0 


1000 

POSCO 

00 01 

O 

1000 

P0 5C1 

434F 


PflSCZ 

5245 



P05C3 

2055 



P05C4 

5341 

O 


poses 

4745 


P0SC6 

2 0 43 



PD5C7 

4155 



P0 5C8 

5345 

o 


P05C9 

4420 


P0 5CA 

5357 



P05CB 

4150 



P05CG 

2 0 57 

o 


P0 5CD 

4849 


P05CE 

4C45 



P05CF 

2 0 4A 



P05D0 

5020 

o 


P05D1 

494E 

100 0 


0011 


1001 

1001 


0048 

o 

1001 


Q5D2 

1001 

P05O2 

00 02 


1001 

P05D3 

5359 



P05D4 

5354 

o 


PQ5D5 

4540 


P0 5D6 

20 57 



P05D7 

4153 



P05C8 

2 0 53 

o 


P05D9 

5741 


POSDA 

5050 



PQ5DB 

4544 


1001 


0009 

o 

1002 

1002 


0 0 52 


1002 


05DC 


1002 

PQ5DC 

0002 

o 

10 0 2 

P05DD 

5359 


PD5DE 

5354 

1 


P0 5DF 

454D 



P05E0 

20 4£ 

o 


P05E1 

4F54 


P0 5E2 

20 53 



P05E3 

57 41 



P05E4 

50 50 

o 


POSES 

4544 

1002 

1003 


0009 



10 0 3 


0 0 52 

o 

1003 

P05E6 

2042 


P0SE7 

5554 



P0SE3 

2 0 57 


o 


p 


MESSAG JPMX, JPH4, 2, 'SYSTEM WAS SWAPPED SO 


MESSAG JPMX, JPH5, 2, 'SYSTEM NOT SWAPPEDSO 


AODMES JPM5,JPM6,* BUT WAITING TO SWAP' 


o 


o 

P'T 

L'-J 

o 

o 

o 

o 

c> 

N8001001 

O 

O 

O 

N80010Q2 Q 

O 

O 

O 

N8001003 

o 

o 


o 


o 
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/ '■ 

o 


P05E9 

4149 




O 



P05'EA 

5449 







P0 5EB 

4E47 





o 


P05EC 

2 0 54 




o 


P05ED 

4F20 






P0 5EE 

5357 







P05EF 

4150 





o 

1003 

1004 


0013 

MESSAG JPMX, JPH7,2,*JP NOT 

IN CORESO 

N8001Q04 

o 


1004 


0066 






1004 


Q5F0 P 





o 

100 4 

P05F0 

0 0 02 




o 

1004 

P05F1 

4A50 






P05F2 

20 4E 







P05F3 

4F54 





o 


P05F4 

2 0 49 




o 


P05F5 

4E2D 


- 




P05F6 

434F 







P05F7 

5245 





o 

100 4 
100 5 


0 0 07 

HESSAG JPHX, JPH8,2 t*JP WAS 

IN CORE^tO 

N8QQ1005 

■ o 


100 5 


0 0 6E 






100 5 


0 5F8 P 





o 

1C05 

P05F8 

00 02 




o 

1005 

P05F9 

4A50 






P05FA 

2057 







P05F8 

41 53 





o 


P05FC 

2 0 49 




o 


P05FD 

4E20 






P0 5FE 

434F 







P05FF 

52 45 





o 

100 5 
1006 

PD600 

00 07 
000 0 

BZS JPHXFLC SEGSIZ-»+JPHXD 


N80fll006 

^ o 

o 







o 

o 







o 

o 







o 

o 







o 

o 







o 

o 







o 

o 







o 


L.-' 


o 


o 
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1008 



1009 



1010 



1011 

1011 

0600 


1011 

0600 

P 

1011 

OQIG 



JOB PROCESSOR MESSAGES PART ¥ 
STRMSG JPMY 


O 




o 

1013 
101 4 

1014 


0 016 

o 

1014 


0600 P 

1014 

P0600 

0 0 02 


101 4 

P08D1 

4649 



P0602 

4C45 

o 


P06 03 

312 0 


P0604 

4649 



P0605 

4C45 



P0606 

32 2.0 

o 


P06D7 

4649 


P06D8 

4C45 



P0609 

3320 



P060A 

4649 

o 


P060B 

4C45 


P060C 

3420 



P060D 

4G4F 



P060E 

4144 

o 


P060F 

5220 


P0610 

A2 50 



PQ611 

20 OD 


1014 


0026 

o 

1014 

P0612 

3132 


P0613 

33-34 



P0614 

2020 



P0615 

3132 

o 


P0616 

3 3 34 


P0617 

2020 



PD618 

3132 



P0619 

3334 

o 


P061A 

2020 


PQ618 

3132 



P061C 

3334 



PQ61D 

2020 

o 


P061E 

3132 


P061F 

3334 



P0620 

2020 



P0621 

3132 

o 


P0622 

3334 

1014 


0022 

o 





MESSAG JPHY,JPM9,2,*FILE1 FILE2 FILE3 FILE4 LOADR BP :R*,1, 
MESSAG *1234 1234 1234 1234 1234 1234 » , 0 


N8001006 

N8001009 

N8001010 

N8DQiail 


N30fll013 
N80Q 1014 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 
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r ■' 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


1015 

1015 0039 

1015 0623 

1015 P0623 QDOZ 
1015 P0624 4A50 
P0625 204C 
P0626 4F43 
P0 627 4B45 
P0628 4420 
P0629 4F55 
PQ62A 5420 
PD62B 464F 
P062C 5220 
P062D 4C49 
P062E 4245 
PQ62F 4454 
P0630 204F 
P0631 5220 
P0632 5245 
P0633 43 4F 
P0634 5545 
P0635 5259 

1015 0012 

1016 

1016 004C 

1016 0636 

1016 P0636 0002 
1016 P0637 5349 
P0638 474E 
PD639 204F 
P063A 4646 
P063B 2052 
P063C 4551 
P063D 5545 
P063E 5354 
P063F 4544 
P0640 204F 
P0541 4620 
P0642 4049 
P0643 4245 
PQ644 4454 
PO 64 5 2 0 4F 
P0646 5220 
P0647 5245 
P0648 434F 
PD649 5645 
P064A 5259 

1016 0014 

1017 P064B 0015 


P 


HESSAG JPMY, JPMA,2,*JP LOCKED OUT FOR LIBEDT OR RECOVERY'-tO N800101 5 


MESSAG JPMY, JPH8,2 ,* SIGN OFF REQUESTED OF LIBEDT OR RECOVERYSO N800 1016 


□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 

o 

n 


o 

o 

o 


BZS JPHYFLtSEGSIZ-»+JPMY1 


N8001017 


o 




C03RD 

o 

1019 

* 


1020 

* 


1021 


o 

1022 

1022 

0660 


1022 

0660 P 


1022 

0011 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


102 4 




102 4 


0016 


1024 


0660 

P 

1024 

P0660 

0 0 02 


1024 

P0661 

3132 



PO 662 

3334 



P0663 

2055 



PO 664 

4E50 



P0665 

524F 



P0666 

5420 



P0667 

5245 



P0668 

5120 



P0669 

5745 



P0 66A 

5245 



P066B 

2041 



P066C 

4354 



P066D 

4956 



P0 66E 

4520 


10 2 4 


OOOE 


102 5 




102 5 


0016 


1Q2 5 

PD66F 

414E 



P0670 

4420 



P0671 

5354 



P0 672 

4143 



P0673 

4B45 



P0674 

4420 



P0 67 5 

4154 



P0676 

2 0 4C 



P0677 

4F43 



P0678 

2020 



PQ679 

3132 



P067A 

3334 


1025 


OOIA 


1026 




1026 


0031 


1026 


D67B 

P 

1026 

P067B 

00 02 


102 6 

P0 67C 

5045 



P067D 

4E44 



P067E 

494E 



P067F 

4720 
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JOB PROCESSOR MESSAGES PARI Z 
STRMSG JPHZ 


MESSAG JPHZ, JPHF,2t'’1234 UNPROT REQ WERE ACTIVE ' ,0 


ADDMES JPMF, JPMC,*AND STACKED AT LOG 1234' 


MESSAG JPMZ,JPHO, 2, “PENDING INPUT REQUEST FOR JP»,0 


o 


N8001Q19 

N8001020 

N8001021 

N3001022 


N80B1024 


N8001025 


N80Q1Q26 


( ■ 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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P068G 

49 4E 



P0681 

50 55 



PO 682 

5420 



P0683 

5245 



PD684 

5155 



P0685 

4553 



P0 686 

5420 



P0637 

464F 



P0688 

5220 



PQ689 

4A50 

10 

2 6 


0 0 OE 

10 

27 



10 

2 7 


0040 

10 

27 


0 6 8A P 

1027 

P068A 

00 02 

10 

27 

P066B 

5045 



P068C 

4E44 



PQ680 

494E 



P068E 

4720 



P068F 

494E 



P0690 

50 55 



P0691 

5420 



PO 692 

52 45 



P0693 

5155 



P0694 

4553 



PD695 

5420 



P0696 

464F 



P0697 

52 2 0 



P0698 

4D49 



P0699 

5052 



P069A 

4F20 

10 

2 7 


0010 

10 

28 

P069B 

0025 

10 

29 




MCSSAG JPMI,JPME,2, 


“PENDING INPUT REQUEST FOR MIPRO',0 


BZS JPHZFH SEGSIZ-»+JPMZ3 


N80G1027 


N8001Q28 

N8001029 


/ 

V..- 

C03RD 


} f 

1031 





1032 





1033 




o 

1034 
103 4 


Q6CQ 



103 4 


■06C0 

P 


1034 


0 012 



103 5 


0016 



103 5 




1035 


06C0 

P 


1035 

P06CO 

0 0 03 



103 5 

PQ6C1 

OD50 


•s^ 


P06C2 

4152 




P06C3 

5449 




P06C4 

5449 


,'0 


PD6C5 

4F4E 




P06C6 

2 0 43 




P06C7 

4F52 




P06C8 

4520 


O 


P06C9 

4144 



P06CA 

4452 




P06CB 

4553 




P06CC 

5345 


O 


P0 6CD 

530D 


103 5 
103 6 
1037 


OODD 



o : 

103 7 


0 024 


1037 


0 6CE 

P 


10 3 7 

P0 6CE 

0 0 03 



1037 

P0 6CF 

5041 


o 


P06DO 

52 54 



P06D1 

4954 




P06D2 

494F 




P06O3 

4-E2Q 


o 

103 7 


a 02A 


1037 

PG6D4 

3030 




P06D5 

3031 




PQ6D6 

2020 


o 


PD607 

3132 


103 ? 
1038 

P0608 

3334 

OOOA 




o 

1038 


S02F 


1038 


06D9 

P 


1038 

P06D9 

00 03 


o 

1038 

P06DA 
P06DB 
P06DC 
P0 8OD 
P06OE 

00 50 
4152 
5449 
5449 
4F4E 




o 


P06DF 

2054 



P06E0 

4852 




P06E1 

4541 



O 


PAGE A9 DATES 08/19/99 

PARTITION CORE MESSAGES 
STRMSG PARX 

MESSAG PARX,PAR1,3,v<;R?ARTITION GORE ADQ-RESSESsR*, 0 


MESSAG^ PARX,PAR2,3 ^'PARTITION 
MESSAG *0001 1234*, 0 


MESSAG PARX^PARStSt'-sRPAPTITION THREADS*. R* , 0 


N8001031 

N30C1032 

N3Q01033 

N8001034 


N8001035 


N8Q01036 

N8G01037 


N8001038 


C.) 

o 

o 

o 

o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


C03RD 
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0ATE3 D8/19/99 



o 

o 

o 

o 

o 

o 


P06E2 4453 
P06E3 0D2.0 

1038 OOOA 

1039 

1039 003A 

1039 06E4P 

1039 P06E4 00 03 

1039 P06E5 0D50 
PD6E6 4152 
P06E7 5449 
P06E8 5449 
PD6E9 4F4E 
P06EA 5320 
PD6EB 494E 
P06EC 2055 
PD6ED 5345 
PD6EE 20 OD 

1039 OOOA 

1040 P06EF 0031 


o 



o 

o 

o 

o 

o 


MESSAG PARXt PAR5t3 1RPARTITI0NS IN USE iR^»0 


BZS PARXFL(SEGSIZ-^+PARX) 


O 


N80Q1Q39 


C--' 
o 
o 
c 
o 
o 

N8001040 

o 

o 

o 

O 

o 

: 

: ^ 

o 

o 

o 


o 
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DATES 0'8/19/99 


1042 




1043 




1044 




1045 




1045 


Q72D 


1045- 


0720 

P 

1045 


0 013 


1046 




1047 




1047 


0016 


1047 


0720 

P 

1047 

P0720 

0 0 01 


1047 

P0721 

5041 



P0722 

5254 



P0723 

4954 



PQ724 

494F 



P0725 

4E2 0 



P0726 

434F 



P0727 

5245 



P0728 

2 0 45 



P0729 

5252 



P072A 

4F52 



P072B 

2020 


1047 


0022 


1047 

P072C 

50 41 



P072D 

5254 



PD72E 

4954 



P072F 

494F 



P0730 

4E2Q 



PG731 

3020 



P0732 

4142 



P0733 

4F56 



P0734 

4520 



FO 735 

3830 



P0736 

3030 


1047 


D016 


1048 




1049 




1049 


0 0 20 


1049 


0737 

P 

1049 

P0 737 

0 0 01 


1049 

P0738 

5041 



P0739 

52 54 



PC73A 

4954 



P073B 

494F 



P073C 

-4E2 0 



P073D 

43 4F 



P0 73E 

5245 



P073F 

2 0 45 



P0740 

52 52 



P0741 

4F52 



P0742 

2020 


1049 


0039 



PARTITION CORE ANALYSIS 
STRMSG PCM 

MESSAG PCM, PCMl-,1, 'PARTITION' CORE ERROR' »,1, 
HESSAG 'PARTITION 0 ABOVE 8000*, 0 


MESSAG PCM,PCM2, 1, 'PARTITION CORE ERROR' *,1, 
MESSAG 'PARTITION OUT OF ORDER', D 


N8001042 
N8001043 
N80Q 1044 
N8001 045 


N800104b 

N8001047 


N3Q01048 

M8D0ia49 



1055 


NEXT SEGMENT 


N80Q1050 

N8001Q51 


N8001052 


N8001055 


□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


1056 

1057 

1058 


PGM= 
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N8001 056 
N3D01057 
N8001D58 


0780 ( 1920 :) C OH = 0000 T 01 DAT = 0000 ( 0) 


0014 EQU NEXTN<»/SEGSIZ-SYSSEG/SEGSIZ'J 

END 
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EQUIVALENCES 


DEF.LINE NAME VALUE 

0000 I OOFF I00Q255) 

0080 SEGSIZ Q06D (000096) 


REFERENCED AT LINE NUMBER 



0 083 

SEGCOR 

0 016 

I C0Q022) 

o 


0 084 

LOA 

QOOl 

( 000001) 

o 

0 08 4 

CON 

OC03 

(OOQ003) 

0 08 4 

LST 

ODO 5 

C 0GD005) 

o 

0 084 

WRT 

00 0 7 

( 000007) 

0 064 

ANS 

00 09 

( 000QD9) 


0 084 

ATA 

OOOE 

( OODOll) 


0 08 4 

CNS 

GOOD 

(0G0013) 

o 

0084 

GMS 

OOOF 

( 000015) 

0 0 85 

MOP 

0011 

(000017) 


0 066 

CMP 

0013 

( 0Q0M9) 

o 

0108 

SSN 

0000 

1 0 OOOOO) 

0188 

WSSN 

0001 

1 OQOOOll 


0273 

ACN 

0 00 2 

( 0000023 


0346 

W ACN 

0003 

1 000003) 

o 

0 45 0 

XACN 

000 4 

C 00G004.) 

0 525 

AG3 JTQ 

QQGl 

( 000001) 


0 527 

AC3 JTi 

0002 • 

(0 000 02) 


0530 

AC3UT2 

000 A 

( OQQOIO) 

o 

Q 533 

AC3 JT3 

0011 

( 009D17) 

0535 

AG3TBL 

0015 

( 000021) 


0546 

f ACN 

000 5 

( 0 00005) 


0108f 
0188, 
0346, 
0 450, 
0616, 
0 778, 
0 847, 
0 9 55 , 
10 22 , 
0 950, 
0 9 88, 
1016, 
0112 , 
0707, 
0173, 
0173, 
0657, 
0829, 


0 108, 
0188, 
0346 , 
0 541, 
0616, 
0 77 8, 
0 847, 
0 960, 
1022 , 
0952, 
0 98 8, 
102 4, 
0119, 
0737, 
0176, 
0194, 
0 660, 
0851, 


0108, 
0188, 
0346, 
0546, 
0616, 
0778, 
0847, 
0960, 
1028, 
0952, 
0988, 
1026, 
0123, 
0820, 
0399 
0201 , 
0 666 , 
0 864, 


0108, 
0268, 
0346 , 
0546, 
0616, 
0778, 
0 880, 
0967, 
1034, 
0952, 
0990 , 
1027, 
0196, 
0 856 


0108, 
0273, 
0346, 
0 54 6, 
0616, 
0778 , 
0885 , 
0 972, 
1034, 
0 953, 
0990, 
1035 , 
0214, 


0108, 
0273, 
0346, 
0546, 
0697, 
0 77 8, 
0685, 
0 972, 
1040 , 
0 954, 
0990, 
1037, 
0 231, 


0108, 
0273, 
0346, 
0 546, 
S702, 
0778, 
CB85, 
0979, 
1 C 4 5, 
0964, 
0998, 
1037, 
0257, 


0108, 
0273, 
0445, 
0 54 6, 
0702, 
Q77 8, 
0885, 
0984, 
1045, 
0964, 
0999, 
1038, 
0305, 


0103, 
0273, 
0450, 
0546, 
0702, 
0778, 
0885, 
0934, 
1052, 
0 966, 
ISOQ, 
1039, 
0309, 


0183, 
0273, 
0450, 
0546, 
0702, 
0842, 
0885, 
0991, 
1057, 
0 966, 
1001 , 
1047, 
0363, 


0188, 
0273, 
0450, 
0546, 
0702, 
0847, 
0885, 
0996, 
1057 
D 966, 
10 0 2 , 
1047, 
0379, 


0188, 

0273, 

0450, 

0611, 

0702, 

0847, 

0885, 

0996, 

0.9 74, 
1004, 
1049, 
0428, 


0188,. 
0273, 
0450, 
0 616, 
0702, 
0847, 
0885, 
1006, 

0976, 

1005, 

1D49, 

0473, 


0188, 
0341, 
0 450, 
0616, 
0702, 
0847, 
0 943, 
1011 , 


0188, 
0346, 
0450 , 
0 616, 
0702, 
0847, 
0 948 , 
1011 , 


0 978, 0978, 
1014, 1014, 
1051, 1051 
0566, 0573, 


0188 
0346 
0 450 
0 616 
0 773 
0847 
0 948 
1017 

0 986 
1015 

0621 


0223, 0242 , 0278, 0404, 0426, 
0671, 0679, §682, 0718, 0725, 
0894, 0909, 0 936 


0507, 0514, 
0728, 0744, 


0597, 0604, 0636, 0639, C646, 0652 
0746, 0755, 0757, 0787, 0801 , 0810 


0 285, 0300, Q 316, 0 3 2h , 0327, 0 33 2 , 0551 

0200, 0222, 0236, 0403, 051 3, 0603, 0(_17 

0153, 0168, 0199, 0221, 0235, 0277, 0387 

0786, 0799, 0827, 0850, 0862, D893, 0908 

0155 
0905 

0152, 0167, 0180 

0180, 0198, 0220, 0234, 0248 

0248, 0276, 0336 „ 

03.36, 0386, 0393, 0430, 0439 

0430, 0 502, 0521 

0488, 0491 

0491, 0494 

0494, 0497 

0 497 

0 462 

0521, 0589, 0592 
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0616 

JPN 

00 0 6 

,(0000061 

0589, 

0626, 

0 667 , 

0674, 

0684 


Q 695 

JP2 ATL 

000 7 

( 0000071 

0619 






0702 

WJPN 

0007 

(QQ0007J 

0667, 

0713, 

0739, 

0748, 

0 75 9 

o 

0770 

JP4AFL 

OOOC 

(0 00012) 

0 705 





077 8 

XPRN 

0008 

(000008) 

0684, 

0759, 

0782, 

0785, 

0798 


0 847 

ypRN 

00 09 

(Q00Q091 

0 837, 

0849, 

0861, 

0872 



0885 

PCN 

OflOA 

(0000105 

0 872, 

0892, 

0907, 

0934, 

0937 

o 

0 948 

SSSMX 

0 42 0 

(001056) 





0 948 

SSMXN 

OOOB ■ 

( 0000115 

0152, 

0167, 

0198 




0950 

SSMl 

001 6 . 

(0 00 022) 






0950 

LSSMl 

DOOO 

(0000135 

0154 





o 

0952 

SSM2 

0024 

(0000365 

0171, 

0178 




0952 

SSM2V1 

0035 

( 0000535 

0174 






0 952 

SSM2V2 

0047 

(0000715 

0177 






0952 

LSSM2 

0023 

(000D355 

0178 





o 

0953 

SSM3 

0046 

(0000725 

0194 





0953 

LSSM3 

OOOA 

( 0B001Q5 

0194 






0 954 

SSM4 

0053 

(0000835 

0200, 

0 201 





0954 

LSSM4 

OODE 

( 0D0B145 

0201 





o 

0960 

SSSMY 

0480 

(0011525 






0 960 

SSMYM 

OOOC 

(000012) 

0 220 , 

0234 





0964 

SSM5 

0016 

{ 000022) 

0223 






0964 

SSM5V1 

0025 

(0000375 

0222 





o 

0964 

LSSH5 

OOlC 

■(0000285 

0 223 





0966 

SSM6 

0033 

(000051) 

0241, 

0 242 





0 9 66 

SSM6V1 

003A 

C 0 00Q585 

0236 






0966 

SSM6V2 

0040 

(0000645 






o 

0 966 

LSSH6 

OOIA 

(0000255 

0242 





0972 

SAGMX 

04E0 

(0012485 







0972 

ACHXN 

OOOD 

(000 0135 

Q276, 

0386, 

0393, 

0 4 39 



0974 

ACMl 

0016 

(0000225 

0426 





o 

0974 

LACMl 

OOOD 

( 0 000135 

0426 





0976 

ACM2 

■0024 

(0000365 

0278 






0976 

LACM2 

0019 

(0000255 

0278 






0 978 

ACM3 

0G3E 

(0000625 

0389, 

0400, 

0401, 

0 409 


o 

0978 

ACM3V1 

■ 0042 

1 0000655 

0403 





0 97 8 

LACM3 

OOIA 

( 0000265 

0 404 






0984 

SACHY 

0540 

(0013445 







0 984 

ACHYN 

OOOE 

(0000145 

0502, 

0 59 2 




o 

0986 

ACM4 

0016 

( OOOQ225 

0 507, 

0597 




0 986 

LACM4 

■ OOOD 

(0000135 

0507 , 

0597 





0 988 

ACM5 

0024 

(0000365 

0 514 






0 988 

ACH5V1 

0028 

(0000405 

0513 





o 

0 988 

ACM5V2 

003 5 

(0000535 






0 988 

LAC?i5 

0012 

(0000185 

0514 






0990 

ACM6 

0037 

(0000555 

0604 






0990 

ACM6V1 

0038 

(0Q.QD595 

0603 





o 

0 990 

ACM6V2 

0048 

(0000725 






0990 

LACM6 

0012 

(00-80185 

0604 






0996 

SJPMX 

05A0 

(0014405 







0 996 

JPHXN 

OOOF 

( 0000155 

0626 





o 

0 998 

JPMl 

0016 

(0000225 

0636 





0 998 

LJPMl 

0010 

<0000165 

0636 






O 


o 


0826, 0837 O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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o 

o 

0999 

JPM2 

0027 

I00Q8395 

0639 





0999 

LJPM2 

OOOE 

(QQQ0141 

0639 






IDOD 

JPH3 

0036 

( 0000545 

0646 




o 

o 

1000 

L JIPM3 

DQll 

10000171 

0646 




IDOl 

JPM4 

0048 . 

J0000723 

0652 





1001 

L JPM4 

00 09 

(000009) 

0 652 






1002 

JPM5 

0052 

(000082) 

0 660, 

100 3 




o 

1002 

LJPM5 

0009 

( 0000095 

0 660 




o 

10 03 

JPM6 

0052 . 

TO0DO325 

0 657 






1C03 

LJPM6 

0013 

(0000195 

0657 






IDOi* 

JPM7 

0 0 6 6 

(000102) 

0671 




o 

o 

100 

LJPM7 

0007 

(0000075 

8 671 




1005 

JPM8 

006E 

C00011Q5 

0666 





1005 

LJPM8 

0007 . 

1 0000075 

0656 






1011 

SJPMY 

06QG 

10015365 





o 

o 

1011 

JPMYN 

0010 

(0000165 

0713 




1014 

JPM9 

0016 

(0000225 

0718 





1014 

JPM9¥1 

0028 

(0000405 

0717 






1014 

LJPN9 

0022 

(0000345 

0718 




o 

o , 

1015 

JPMA 

0 03 9 

( 0000575 

G 725 




1015 

L JPHA 

0012 

(0000185 

0725 





1016 

JPMB 

004C 

(0000765 

0723 






1016 

LJFMB 

0 014 

(0000205 

0728 




o 

o 

1022 

SJPMZ 

0660 ' 

(0016325 


0.73 9, 

0 748 


1022 

JP?-f ZN 

0011 ' 

(0000175 

0 674.^ 



1024 

JPMF 

0016 

(0000225 

0 741, 

0 744, 

1025 




1024 

LJPMF 

OOOE 

10000145 

0 7 44 




o 

o 

1025 

JPM'C 

001 6 • ■ 

(0000225 

0 746 




1025 

LJPMC • 

0 01 A . 

(0000265 

0 7 46 

0 757 




1026 

JPHD 

GQ31 ' 

( 0 000-495 

0682, 





1026 

LJPMD 

OOOE 

(0000145 

0682, 

0 757 



o 

o 

1027 

JPME 

004C 

( 0000645 

0679, 

0755 



1027 

LJPME 

0010 

C 0000165 

0679, 

0755 




1034 

SPARK' 

06C0 

(0017285 



0826, 0849, 

0861 



10 34 

PARXN 

0012 

(0000185 

8 7 85, 

0 79 8, 

■ o 

o 

1035 

PARI 

0016 ■ 

(0000225 

0 787 




1035 

LPARl • 

aooD 

(000013) 

0787 


0864 



10.37 

PAR2 

0024 

(0000361 

0 8Q1, 

0 829, 




1037 

PAR2¥1 

002A 

(0000425 

0 8 00 , 

0828, 

0 863 


o 

o 

1037 

LPAR2 

GQOA ■ 

(0000105 

0-8 01, 

0 8 -2! 9 ‘f 

0864 


1038 

PAR3 

002F 

(000047) 

0 810 





1038 

LPAR3 

000 A 

(0008105 

0810 






1039 

PAR5 

Q03A 

( 0030585 

0 851 




o 

o 

1039 

LPAR5 

OOOA 

(QQQOIO) 

0 851 




1045 

SPCM 

072 0 

(0018245 


0907, 

0934 



1045 

PCMN 

B013 

(000019) 

0.892, 




1047 

PCMl 

0016 

(0000225 

0 894 




o 

o 

1047 

PCMIVI 

B022 

(00 0 0345 

0 894 




10 47 

LPCMl 

0016 . 

1 000Q22) 





1049 

PCH2 

Q02D 

(0000451 

0909 






1049 

PGH2¥1 

0039 

(0000575 

0909 




o 

o 

1049 

LFCH2 

0016 

(0000225 




1051 

PCH3 

0044 

( 0 00 06 85 

0 936 




o 









o 


O 


O 
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o 


1051 PCM3V1 
1051 LPCM3 
1057 NEXTN 


0050 I00Q080) 

0016 I0CO0221 

OOIA 10000201 


0 936 

0782, 0937 


O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 

o 

o 

o 


o 

o 

o 

o 

o 


o 
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O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


SYMBOLS 


F.LINE 

NAME 

ADORE 

0078 

SYSSEG 

000 0 

0106 

ss 

000 0 

0108 

SSOP 

0060 

Q1Q8 

SSIFG 

0061 

0 108 

SSHFG 

0062 

0108 

SSCl 

0063 

0108 

SSC2 

0064 

0108 

SSC3 

006 5 

0108 

SSC4 

0066 

0111 

SSI 

0001 

0118 

SSll 

. GOOA 

0119 

SS12 

oooc 

0 130 

SS13 

0017 

0132 

SS131 

0019 

0137 

SS15 

OOIE 

OlAO 

SS132 

0020 

0144 

SS17 

0024 

0148 

SS171 

0028 

0151 

SS18 

002A 

0152 

SS181 

002B 

0159 

SSILVL 

■■ 0031 

0160 

SSIENT 

0032 

0161 

SSINEN 

0 03 3 

0162 

SSITP 

0034 

0163 

SSINOS 

003 5 

016 7 

SS 2 

003 6 

0172 

SS21 

• 003B 

0183 

SSFIL 

0046 

0188 

WSS 

006 0 

0188 

WSSOP 

OGCC 

0188 

WSSIFG 

GOGi 

0188 

WSS'MFG 

00C2 

018 8 ■ 

WSSCl 

O0C3 

0168 

WSSC2 

OQC 4 

0 188 

WSSG3 

00C5 

0188 

WSSC4 

0 0C6 

0191 

SS3 

0061 

0194 

SS32 

0064 

0197 

SS321 

006A 

0198 

SS33 

D06B 
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0 108 , 

018 8, 

0273, 

0 972, 

0984, 

0984, 

0108, 

0108, 

0108, 

0146, 

0169- 


0137, 

0145,' 

0148, 

0143 

012 6, 

0129 

0121 

0 127 


0134 



0128, 

0157 

0147 

013 5,' 

■0149 

0113, 

0125, 

0130, 

0 122, 

0141 


0116, 

0 133, 

0172 

0151, 

0138 
0 170 

0156 


0188-, 

G188, 

0188, 

0247 

0191, 

0203, 

0246 


C188-, 0188t 0188» 0188-t iil88f 0188, 0188, Q188, G2Q0, 0222, 0236, 0249, 0268 


0192 
0 208 


L' 

n 

o 


c 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


( 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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0207 

SS34 

007A 

0205 

0204 

0 210 

SS3CTR 

007C 

0202, 

0 213 

SS4 

D07D 

0193, 

020 6 

0 220 
0 227 

SS41 

SS5 

00 8 5 
003F 

0216, 

0219 

0 2 42 

SS51 

OOA 4 

0 238 , 

0240 

0 253 

SS3GI 

00 AB 

0197, 

0 217, 

0256 

SS3GT1 

OOAE 

0 2 62 


G 263 

SS3GT2 

00B5 

0 2 60 

0232, 

0265 

SS5TP 

00B6 

0 228, 

0 266 

SS3TP 

0.0 B 7 

0200, 

020 7, 

0268 

0273 

WSSFIL 

AG 

ODBC 

ooco 

0273, 

0 273, 

0273 
0 273 

ACOP 

ACIFG 

0120 

0121 

0 301, 

0312 

0 273 

ACHFG 

0122 

0 329 

0289, 

0 273 

ACCl 

0123 

0283, 

0273 

AGC2 

0124 

0 334 


0 273 

ACC 3 

0125 

0306 

0 291, 

0 273 

AGC4 

■ 0126 

0 2 81, 

0276 
0 2B0 
0265 

ACl 

ACll 

AC115 

OOCl 

00C6 

OOCC 

0296 


0 291 

NXf ACL 

00D2 

0 2 87 


0 297 

ACLNTH 

0QD8 

0 293 


0323 

AG12 

OOFl 

8 310 

0.317, 

0339 

ACITMP 

0101 

0314, 

0341 

0346 

ACFIL 

WAC 

0102 
012 0 

0346, 

0346, 

0346 

0346 

WACOP 

WACIFG 

0180 

0181 

0355 


0 346 

WACMFG 

0182 

0 375 

0 413, 

0346 

WACCl 

0183 

0411, 

0346 

WACC2 

0184 

0377 

6433, 

0346 

WACC3 

0185 

0421, 

0346 

WACC4 

018 6 

0 3 47, 

0 42 9 

0347 

AC2QSV 

018 6 

§392 , 

0 395 

Q 354 

AC2SAC 

.0121 

0 3 56, 

0 361 , 

0355 

AC2BUF 

-0122 

0 358 , 

0364, 

0358 
0 360 

AC2BU 

AC2 

0125 

0129 

0357, 

0 419 

0 361 

AC21 

012A 

0367 


0 369 

AC22 

0131 

0 366 


0375 

AC225 

0136 

0 372 


0377 

AC2SSD 

D138 

0 385 


0386 

AC23 

0141 

0384 


0 392 

AC 231 

0147 

0 382 


0 401 

AC232 

0150 

0 390 


0 403 

AC233 

0151 

0 441 

0410 

Q 414 

AC270 

0162 

0407, 

0 421 

AC242 

0168 

0 415 


0426 

AC27 

0160 

0 414 


0 42 7 

AC243 

017 0 

0 42 5 



L-' 


O 


O 


0 263 








o 

0233, 

0218, 

0236, 
0 22 2, 

0237 

0229, 

0239, 

0254, 

0258, 

0261 


o 

0273, 

0273, 

0273, 

0 273, 

0273, 

0273, 

0337, 

0 341 

0-290, 

0311, 

0319, 

0 32 0 





o 

0294 








o 









^ o 

0325, 

0328, 

0 333 






o 

0346, 

0346 , 

0 346 , 

0 346 , 

0346, 

0346, 

.0403, 

0 431, 0 445 

0 423 








o 

0 43 8 








o 

0 37 0, 
0369, 

0403, 
0 381, 

a 416, 
3 405 , 

0418, 
0 40 8 , 

0434 

0412, 

0 417, 

043 7 


o 


o 


o 


o 


o 


o 


o 


c...) 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATE'*. 

08/19799 

0 433 

AC25 

0176 

0373 






0437 

AC251 

017A 

0 435 






0 439 

AC252 

017C 







0 443 

AC2ERR 

017F 

0 424, 

0 43 6 





0445 

WACFIL 

018 0 





0 45 0 , 

0 450 

0 45 0 

XAC 

018 0 

0450 , 

0450, 

0 45 0 , 

0450, 

0450 

XAGOP 

OlEO 







G 450 

XACIFG 

OlEl 







0 450 

XACMFG 

01F2 

0518 






C 450 

XAGCl 

01E3 

0 456 






0450 

XAGC2 

01E4 

0 471 






0450 

XACC3 

Q1E5 







0 450 

XAGC4 

01E6 

0 459 

0506 





0456 

AC3ERR 

01E3 

0504, 





0459 

AC3 

0181 

0520 






Oh60 

AC31 

0182 







Q 463 

AC312 

0185 

0 46 3 






0 471 

AC314 

018B 

0 46 5, 

0467 





0 462 

AC314B 

0196 

0480 






0488 

AC315 

019B 

0 483 






0 500 

AC316 

D1A7 

0 489, 

0 ^^92 , 

0 495, 

0 498 



0 502 

AC317 

01A9 

Q 486 , 

0500 





0 508 

AC3171 

OlBl 

3 505 






0 515 

AC318 

OIBE 

0481, 

0487, 

0501 




0521 

AC319 

01C4 

0519 






0 524 

AG3 JBT 

01C6 

0 463 , 

0525, 

0527, 

0530, 

0533, 

0 53 5 

0537 

AC30IP 

aiDC 

0 477 , 

0 482, 

0512, 

0 513 

0517 


0538 

AC3DIX 

OIDE 

0 460, 

S472, 

0508, 

0515, 


0539 

AC3TP 

OIDF 

0 461 , 

0 464 





0 541 

XACFIL 

OlEO 







0 546 

XAC 

OlEO 

0546, 

0 546, 

0546, 

0545, 

0546, 

0546 

0 546 

YACOP 

0240 







0 546 

YACIFG 

0241 

0584 






0546 

f ACMFG 

0242 

0 579 , 

0-5 85 





0546 

YACCl 

0 243 

0 586, 

0594, 

0596 

0567 



0 546 

YACC2 

0244 

0 548, 

0-553, 

0 559, 



0546 

YACC3 

0245 

0 588 






0546 

YAGC4 

■0246 







0548 

AC4 

OlEl 

0581 






0 565 

AC42 

01F2 

Q57G 






0576 

AC44 

OlFE 

0 5 58 , 

0605 





0 583 

AC49 

0204 

0580 . 






0 592 

AC45 

020C 

0575 






0598 

AC451 

0214 

0 595 






0607 

AC4DIX 

0222 

0 549, 

0 554, 

D560, 

0 576, 

0578, 

0598 

0608 

AC4TP • 

0223 

0552, 

0 567, 

0569, 

0 574 



0609 ■ 

AC40TP 

0224 

0 564, 

0 60 2, 

0603 




0611 

YACFIL 

C226 




0616, 

0616, 

0616 

0616 

JP 

0240 

0616, 

0616, 

0616, 

0616 

JPOP 

0 2A0 







0616 

JPIFG 

02A1 







0616 

JPHFG 

02A2 







0616 

JPCl 

02A3 








o 

o 

o 

0450, 0450, 0513, 0522, 0541 

o 

o 

o 

o 

o 

o 

0546, 0 546, 0590, 0603, 0611 

o 
o 

O 

o 
o 
o 
o 

o 


0616, 0616, 0668, 0685, 0697 


c.-'- 
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o 

0 616 

JPC2 

02A4 




0616 

JPC3 

02A5 




0616 

3PC4 

02A6 



o • 

0619 

G620 

JP2 

JP21 

0241 

0242 

0625 



0626 

JP220 

0248 

0624 



0630 

JP22 

024A 

0634 



0 639 

JP221 

0253 

0 637 

■ , 

0 6 41 

JP23 

0256 

0631 , 


0650 

JP3 

0 25E 

0642, 

0 644 


0 655 

JP31 

0264 

0 651 


o 

0660 

JP32 

026A 

0 656 

0658 

0 664 _ 

JP33 

0260 

0 6 53, 


0 667 

JP331 

D272 

0 647 



0 671 

JPll 

027 4 

0665 


o 

0 682 

JP112 

0281 

9 677 

0 68 0 

0 684 

JP113 

0284 

0 673, 


0687 

JP2AT 

0286 

0 620 , 

0622, 


0688 

JP2UPI 

028 6 

0632 

0655 

o 

0689 

JP2SSH 

023 7 

0630, 

Q69ii 

JP2FI1 

0288 

9 6 43, 

0 664 


0691 

JP2UPT 

■028 9 

0 633 

0650 


a 692 

3P2SP0 

0 28 A 

0641, 

o : 

0693 

JP2MI8 

0280 

C672 


0 694 

JP2MIX 

Q28C 

0 676 



0697 

3PFIL 

0280 

0702, 

0702, 


0702 

WJP 

D2AQ 

o 

0702 

WJPOP 

0300 



0 702 

WJPIFG 

0301 




0 702 

MJPMFG 

0302 




0 702 

WJPCl 

03 0 3 



o 

B702 

WJPC2 

030 4 



0 70 2 

W JPC3 

030 5 




0702 

WJPC4 

D306 




e 70 5 

JP4 

02A1 

0711 


o : 

0 706 

JP41 

02A2 


0 713 

JP42 

02A8 

8710 



0 72 8 

JP43 

D289 

0 723 

0 726 


0 730 

JP44 

Q2BC 

0722 , 

O 

0 734 

3P45 

C2-C0 

0732 


0739 

JP451 • 

02G5 

0 7 43 



0 746 

JP452 

0202 

0745 


0748 

3P46 

D2D5 

0 733, 

O 

0757 

JP461 

02OF 

0 7 53 

0756 

0759 

3P47 

■02E2 

0751, 


0 7 62 

JP4AF 

D2€4 

0706, 

070 8, 


0 763 

JP4TR\? 

02E4 

0 735 


O 

0 764 

4P4UPI 

02E5 

3 730 


0765 

JP4FI1 

02E6 

0717 

0742 


0 766 

JP4SWT 

02EC 

0721, 


0767 

JP4UPT 

02EO 

0731 


O 

0 768 

JP4HI8 

0 2EE 

o75o 


0769 

JP4MIX 

Q2EF 

0752 



date? 08/19/99 


0 695 


070?** 0702, 07Q2, 0702, 0702, 0702, 0717, 0741, 0760, 0773 


0770 


L.- 


n 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


o 


o 


o 
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date: 

08/19/99 

o 

0771 

JP4TP 

0 2FQ 

0734, 

0 73 8, 

0741 



0 773 

WJPFIL 

02F2 






0778 

XPR 

0300 

0778 , 

0778, 

0778, 0778, 

0778, 0778 

o 

0 778 

XPROP 

0360 





0778 

XPRIFG 

0361 






0 77 a 

XPRNFG 

0362 






0778 

XPRCl 

0363 

0815, 

0818 



o 

0 778 

XPRC2 ■' 

0364 

0817 




0 77 8 

XPRC3 

0365 






0 77 8 

XPR€4 

0366 





1 

0 785 

PI 

030 7 

0 781 




1 o 

0790 

PIA 

■ 030 E 

0807 




0792 

P2 

0311 






0798 

P2A 

0317 

0796 





0 800 

P26 

0319 





o 

0810 

P3 

0327 

0797, 

0-804 



0811 

P4 

032A 






0 813 

P5 

032C 

• 0 8 36 





0826 

PTHD 

033E 

0824 




o 

0830 

NOTHD 

0345 

0822, 

0 825 



0836 

P55 

0348 

0 834 



, 


0 837 

P6 

034C 

0835 





0839 

NUMPAR 

034E 

08 02, 

0833 



o 

0 840 

PARTMP . 

034F 

0 793, 

0 79 4, 

0800, 0813, 

0 821, -0 828 

0841 

INDEX 

0 351 

0769, 

0303, 

0805, 0806, 

0812-,. ,0 830 


0 8 42 

XPRFIL 

0352 






0847 

ypR 

0360 

0847, 

8847, 

0847, 0847, 

0847, -0847 

o 

0 847 

f PROP 

03CO 





0847 

ypRIFG 

03C1 






0 647 

yPRMFG' 

Q3C 2 . . 






0847 

7PRC1 

03, C3 





o 

0847 

¥PRC2 

03'C4 

0854 




0847 

yPRC3 

03C5 





' 

D 847 

VPRC4 

03C6 





1 

0 85i^ 

GNTINU 

03 6 6 

08T1 




o ■ 

0 859 

INUSC 

0360 

0 857 




0 865 

NOUSE 

0379 

0858 





0 871 

P65 

037F 

Q869 





. 8872 

P7 

0 38D 

0 8 70 




o 

0874 

PARNUM 

03-8 2 

0 868 




0 875 

INDEX2 

0383 

0 8 53, 

0865,-- 

-0 866 



0876 

USETMP 

0384 

0859, 

G 86 O-,- 

0863 



0 878 

THOADR 

038 6 





o 

0 879 

USEADR 

038 7 





0880 

YFRFIL 

0388 






0 885 

PC 

03CO 

0-885, 

0885, 

QB85, 0885, 

0885, 0885 


D885 

PC OP 

0420 





o 

C 885 

PCIFG 

0 421 





0 885 

PCMFG 

0422 






0 885 

PCCl 

0 423 






0885 

PCC2 

0424 





o 

Q 885 

PCC3 

042 5 





0885 

PCC4 

0426 






o 


o 


JQ778» 0778, 0733, 0800, 0823, 0838, 0842 


o 
o 
o 
o 
o 
o 

0831 O 

0847, 0847, 0863, 0873, 0880 

O 
O 
- O 
O 

o 

0886, 0885, 0938, 0943 

o 

o 

o 
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DATES 

08/19/99 


G 887 

PCI 

03C1 








0 895 

PCll 

03CC 

0891 







0896 

PC 12 

03-CO 

0916 







0 90 5 

PC13 

0307 

0903 







0911 

PCI 5 

03DF 

0906 







0 918 

PC16 

03F5 

0904, 

0910, 

0913 





0926 

PCI 7 

03EF 

0 922, 

0929 






Q930 

pcia 

03F2 

0925, 

0927 






0937 

PC20 

03FB 

0 933 







0939 

^^UMPRT 

03FD 

0911 , 

0 93 0 






0940 

PCIDX 

03FE 

0896, 

0912, 

0914, 

0915 




0941 

CUR PAR 

03FF 

0 889, 

0900 , 

0901 





0 9 42 

BSYBIT 

0400 

^ 0 924, 

0928, 

0932 





0 9 43 

PCFIL 

0401 








0 948 

SSMX 

0420 

0 9 50, 

0952, 

0952, 

0952, 

0953, 

0954, 0955 


0950 

SSSMl 

0420 

0950 







0952 

SSSM2 

D42F 

0952 







0953 

SSSM3 

0452 

0 9 53 







0954 

SSSM4 

045D 

.0954 







0 955 

SSH XFL 

046C 








0960 

3SMY 

0480 

0964, 

0 964 , 

0966 , 

0966, 

0 96 6 , 

0 967 


0964 

SSSM5 

0480 

0 9 64 







0 966 

SSSM6 

0490 

0966 







0 9 67 

SSMYFL 

0488 








0972 

ACHX 

04E0 

0974, 

0976, 

0978, 

0973, 

0 979 . 



0 974 

SACMl 

0 4E0 

0974 







0 976 

SACH2 

04EE 

0976 







0 978 

SACM.3 

050 8 

0978 







0979 

ACM XFL 

0 52 3 








0 98^ 

AC'MY 

0540 

0 9 86, 

0988, 

0 938, 

0 988, 

Q 99 0 , 

0990, 0990, 

0991 

8 986 

SACM4 

0540 

0986 







0 988 

SACM5 

054E 

0988 







0990 

SACM6 

0561 

0990 







0 991 

ACMYFL 

0 574 








0995 

JPMX 

35A0 

0998, 

0 999, 

IQSfl , 

1 G C 1 , 

i06'2. 

106 4, 10 0-5, 

100 6' 

G 998 

SJPMl 

B5A0 

0998 







0999 

SJPM2 

0581 

0999 







1000 

SJPM3 

05C0 

1000 







1001 

S JPM4 

0 502 

1001 







1002 

SJPM5 

C5DC 

1002, 

1003. 






IQ 04 

S^IPMF 

05FO 

1CQ4 







130 5 

SJPM8 

G5F8 

10 0 5 



< 




1006 

JPMXFL 

0690 








1011 

JPH Y 

Q6 0Q 

1 D 1 4, 

1014# 

1015, 

1016, 

1017 



1014 

SJPM9 

0600 

1014 







1015 

SJPMA 

0 623 

1015 







1016 

S JP'MB 

0636 

1016 







1017 

JPMYFL 

064B 








1022 

JPMZ 

0660 

1024, 

1026, 

1027 , 

1028 




1024 

SJPMF 

0660 

1024, 

1025 






1026 

SJPMD 

067-8 

1026 







1027 

SJPME 

068 A 

1027 







1028 

JPMZFL 

069E 









o 
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DATE'; 

08/ 19/99 

r.) 

1 Q3U 

PARX 

06CO 

1035, 

1037, 

1037, 

1038, 

1039, 1040 


1035 

SPARl 

■G6C0 

1035 






1037 

SPAR2 

0 6CE 

1037 





o 

1038 

SPAR3 

06D9 

1038 





1039 

SPAR5 

0 6E4 

1039 






10-40 

PARXFL 

06EF 





1051, 1051, 1052 


1045 

PCH 

0720 

10 47, 

1 047 , 

1049, 

1049, 

o 

1047 

SPCMl 

0720 

1047 





1049 

SPCM2 

0737 

10 49 






10 51 

SPCM3 

D74€ 

1051 






1052 

PCMFL 

0765 







o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


C) 

□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATE-; 08/19/99 

o 






O 

o 

£ X T E R 

N A L S 




O 







DEF.LINE 

NAME 

VALUE 

REFERENCED AT 

LINE NUMBER 

o 

0 089 

SCHLNG 

00 0 6 

0114 


O 


0089 

SCHTOP 

0068 

0118, 

0195 



0089 

VOLBLK 

00B6 

0265 



o 

0 089 

VOLEND 

0 09 0 

0227 


.: ■ ■ ■ o 

0090 

GALTHD 

00139 

0297 



0090 

SWAPON 

028A 

0308, 

C692 



0090 

LVLSTR 

Q1F3 

0 565 



o 

0092 

00E8UG 

OIDB 

0 534 


o 

0 092 

MIPRO 

OIDA 

0 534 



fl 093 

LOADSD 

01C6 

0524 


, 


0093 

J08ENT 

01C7 

0 526 



o 

0 093 

J08PR0- . 

01G8 

0528 


o 

0 093 

PROTEC • 

OIDO 

0531 



0094 

JPLOAD 

Q1C9 

0528 




0094 

JPGHGE 

OICA 

0528 



o 

0D94 

JPT13 ■ 

OICB 

0528 


o 

0094 

LIBEDT ■ 

QlDl 

0531 



0095 

RESTOR 

OICF 

0 529 




0095 

RCOVER 

D1D2 

0 531 



o 

0 095 

8RKPT 

0103 

0531 


; O 

0 096 

JCRDV4 

GICC 

0529 



0096 

JLGOV4 

OICD 

.0 529 




0 096 

JPFLV4 

0104 

.0532 



o 

0 096 

JPSTV4 

DICE 

0 529 


O 

0096 

NAHEV4 

0113 5 

0532 



0 097 

AFILWA 

01D6 

0532 




0 098 

TOFUNC 

0109 

Q534 



o 

0 0 96 

EFLIST 

0107 

0 534 


O 

0098 

EFSTOR 

01D8 

0 534 



D 100 

MIB 

02EE 

0693, 

0768 



u 10 0 

MIBX 

02EF 

0694, 

0769 


o 

0 100 

UNPIO 

02E5 

0688, 

0764 

o 

0 100 

SPASW 

0287 

0689 



0100 

FILEl 

02E6 

0690 , 

0 765 



0 lOQ 

FILE2 

Q2E7 

0765 



o 

0 100 

FILE3 

02E8 

0765 


o 

0 100 

FILE4 

0 2E9 

0765 



0 IDO 

GNPTIM 

02EO 

0 691, 

0 767 



SlDl 

FRA KV 

02E4 

0763 



o 

0101 

LOADIN 

0 2EA 

0765 


o 

0101 

SWTCH 

0 2E'C 

0 766 


o 






o 

o 






o 

o 






o 


o 







r" 

\ 
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date: 08/19/99 

o 

0 102 

ALCLGH 

QOCB 

0284 



O 


0103 

THDS 

032E 

0314 





0103 

USE 

0331 

0 816 




o 

0 103 

LSTPRT 

03FD 

0 839, 

0-874, 

0 93.9 

■ ■ - ■ O 

0103 

SUSY 

03E6 

0918 




0103 

PARiTBL 

Q3CF 

0779, 

0790, 

0 887, 

0 8 97 

o 







O 

o 







O 

o 







O 

o 







o 

o 







o 

o 







: O 

o 







o 

o 







O 

o 







^ o 

o 







o 

o 







o 

o 







■ o 

o 







o 

o 







■ o 
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»»»• A L 

P H A 

B E T I 

GAL 

SORT 

0 F 

S Y !■! B 

0 L S 











AG 

0 273 

ACl 

0 276 

ACll 

0 280 

AC115 

0285 

AC12 r 

0323 

ACllMP 

0339 

AC2 

0360 

AC 21 

0 361 

AC22 

0369 

ACE25 

0375 

AC23 

0 386 

AC231 

0392 

AC232 

0*+01 

AG233:, 

0403, 

AC242 

0421 

AC243 

0 42 7 

AC2 5 

0433 

AC251 

0437 

AC252 

0439 

AC27 

0426 

AC27Q 

0 414 

AC2 8U 

0 35 8. 

AC2 BUF 

035 5 . 

AC2ERR 

0443 

AC2QSV 

0347 

AC2SAC 

0354 

AC2SSD 

0377 

AC3 

0459 

AC31 

0 460 

AC312 

0 463 

AC314 

0471. 

AC3148 

0482 

AC315 

8488 

AC316 

0500 

AC317 

0 50 2 

AC3171 

0508 

AG318 

0 515 

AC319 

0521 

AG3BIX 

0 538 

AC3ERR 

0456 

AG3JBT 

0524- 

AC3JT0 

0 525 

AC3JT1 

0527 

AC3JT2 

0 530 

AG3JT3 

0533 

AC30TP 

0537 

AC3TBL 

0535 

AC3TP 

0539 

AC4 

0548 

AG42 

0565 ■ 

AC44 

0576 - 

AC45 

0592 

AC451' 

0598 

AG49 

0583 

AC40I X 

0607 

AC40TP 

0609 

AC4TP 

060 8 

ACCl . 

0273 

ACC2 
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0060 


0 0.37 

EQU 

WD8Lf55 ) 


NS30 00 80 


o 

0081 


Q038 

EQU 

¥¥BUFX5 6) 


N8300081 

■ G 

i © 

0083 






N8300063 

■ © 


00 8 4 



POINTS 


N3300 08U 



0 0 8 5 



♦ 



N83GCa85 


! O 

0086 



FNT 

loupyu 


N33000e6 

• o 

0067 






N8300087 

o 








o 

1 

00 89 



»-»^»».»»exte:rnals 


N8300 089 



0090 



EXT 

LOGIA 


N830D09G 


o 

0Q91 



EXT 

NAXSEC 

MAX ADDRESSABLE SECTOR ADDRESS 

N83QQ091 

o 

0092 






N8300092 

' 

0Q93 






N83Q0093 



0G9 4 

peoQu 

1300 

I0UPIT4 UHP 

lOQOl 


N8300094 


o 

0095 

POOOl 

OOAQ 

USED IN 

THE lOUP 

N830C095 

■ o 

O 








o 

o 








• o 
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0096 PD002 0039 

0097 P00D3 0039 

0098 P003C 0000 


lOV ADC IOVL-^-1 
lOVDl 8ZS IO\f01(57) 
lOVL NUM 0 



O 

o 


o 

o 



o 


o 

o 

o 

o 

o 

o 

o 


o 


N8300096 

N8300097 

H8300098 


□ 

o 

o 

o 
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o 
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o 

o 

o 

o 

o 

o 

o 

o 


I ') 


O 

o 

o 

o 

o 

o 

o 
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o 
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010 0 
OlOl 
C102 


VALID lOUP REQUEST CODES TABLE - lOTOl 


U X u u 

0104 




DATA 

TRANSFER REQUESTS 

0105 







010 6 

P003D 

43 43 

lOTDi 

ALF 

IfCC 

+ 0 

Q1B7 

P003E 

43 40 


ALF 

IfCM 

+ 1 

0108 

P003F 

4350 


ALF 

ItCP 

+ 2 

0109 

P0040 

43 4C 


ALF 

ItCL 

+3 

0110 

P0041 

50 4C 


ALF 

ItPL 

+ 4 

0111 

P0042 

5G43 


ALF 

ItPC 

+ 5 

0112 

P0043 

5042 


ALF 

1 tPB 

■+6 

0113 

PQ044 

5050 


ALF 

ItPP 

+7 

0114 

P0Q45 

50 40 


ALF 

ItPM 

+ 8 

0115 

P0046 

4D 4C 


ALF 

1,ML 

+ 9 

0116 

F0Q47 

4D43 


ALF 

1,HC 

+ 10 

0117 

PQ048 

4D42 


ALF 

ItMB 

+ 11 

0118 

P0049 

404D 


ALF 

1,MM 

+ 12 

0119 

PQ04A 

CD50 


NUM 

$CD5Q 

+ 13 

0120 



if- 




0121 




VERIFY REQUESTS 


0122 







0123 

P0Q4B 

43 43 


ALF 

1,CC 

+ 14 

0124 

P0G4C 

43 50 


ALF 

ItCP 

+ 15 

0125 

P004D 

43 4D 


ALF 

1,CM 

+ 16 

0126 

P0 0 4E 

5050 


ALF 

IfPP 

+ 17 

012 7 

P00 4F 

4D5Q 


ALF 

If MP 

+ 18 

0128 

PD050 

C04D 


NUM 

$CQ4D 

+ 19 

0129 







0130 




MOTION CONTROL REQUEST? 

0131 







0132 




THE 

REQUEST CODE 

CONSI? 

0133 




CHAR 

BEING ALWAYS 

T. 


0134 

0135 

0136 
013 7 

0138 

0139 

0140 

0141 

0142 


0144 

0145 

0146 

0147 

0148 

0149 


P0D51 
P0C52 
P 0 0 5 3 
PQ054 
PQ055 
P0D56 
P0057 
PQ058 


4146 

4152 

4246 

4252 

5257 

4546 

5344 

D54C 


AL F 
ALF 
ALF 
ALF 
ALF 
ALF 
ALF 
NUM 


1,AF 


li 
1 1 
If 
It 
It 


AR 

BF 

BR 

RW 

EF 


1,S0 

SD54C 


+ 20 
+ 21 
+ 22 
+ 23 
+ 24 
+ 25 
+ 26 
+ 27 


CARD TO CARD 

CARD TO HAG TAPE 

CARD TO PAPER TAPE 

CARD TO PRINTER 

PAPER TAPE TO PRINTER 

PAPER TAPE TO CARD 

PAPER TAPE TO PRINTER AND CARD 

PAPER’ TAPE TO PAPER TAPE 

PAPER TAPE TO HAG TAPE 

MAG TAPETOPRINTER 

MAG TAPE TO CARD 

HAG TAPE ¥0 CARO AND PRINTER 

MAG TAPE TO HAG TAPE 

MAG TAPE TO PAPER TAPE 


VERIFY CARD-CARD VCC 
VERIFY CARD-PAPER TAPE VCP 
VERIFY CARD-MAG. TAPE VCM 
VERIFY PA PER- PAPER TAPE VPP 
VERIFY NAG. TAPE-PAPER TAPE VMP 
VERIFY HAG. -MAG. TAPE VMM 


OF THREE ALPHA CHARS THE FIRST 


ADVANCE TAPE NBR OF FILES 
ADVANCE TAPE NBR .OF RECORDS 
BACKSPACE TAPE NBR OF FILES 
BACKSPACE TAPE NBR OF RECORDS 
REWIND TAPE 
WRITE END OF FILE 
SET TAPE DENSITY 
REWIND AND UNLOAD TAPE 


* 

t- 


VALID NUMBER 
TABLE I0TQ2 
THE INDEX TO 
THE VALID 
THE TABLE 


AND TYPES OF parameters FOR THE lOUP REQUESTS 

THIS TABLE IS THE INDEX TO lOTOl TABLE FOR 
REQUEST CODE. 

IS LAID OUT AS 


N8300100 

N8300101 

N8300102 

N8300103 

N830G104 

N83001C5 

N83Q0106 

N8300107 

N8300108 

N8300109 

N830011Q 

N830D111 

N83D0112 

N3300113 

N8300114 

N330011 5 

N830011 6 

N8300117 

N8300118 

N8300119 

N33D012D 

N8300121 

N8300122 

N8300123 

N8308124 

N8300125 

N8300126 

N83Q0127 

N830D126 

N8300129 

N83D0130 

N830Q131 

N8300132 

N83Q0133 

N83Q0134 

Na30Q135 

N8300136 

N8300137 

N83GQ138 

N830G139 

N8300140 

N83Q0141 

N3300142 


N83G0144 

N830D145 

N8300146 

N8300147 

N8300148 

N83D0149 


(_) 

o 

o 

o 

c> 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 
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0150 

0151 

0152 


0154 

PO 

059 

80 

04 

0155 

PO 

05A 

80 

04 

0156 

PO 

05B 

00 

03 

015 7 

PO 

05C 

80 

04 

Q158 

PO 

05D 

01 

05 

0159 

PO 

05E 

01 

05 

015 0 

PO 

05F 

02 

06 

0161 

PO 

060 

00 

04 

0162 

PO 

061 

•01 

05 

0163 

PO 

062 

81 

06 

0164 

PO 

063 

81 

06 

0165 

PO 

064 

82 

07 

0166 

PO 

065 

01 

05 

0167 

PO 

066 

01 

05 

0168 

PO 

067 

80 

03 

0169 

PO 

068 

00 

02 

0170 

PO 

069 

80 

04 

0171 

PD 

06A 

00 

02 

0172 

PO 

06B 

0 0 

03 

0173 

PO 

0 6C 

DO 

03 

0174 

PO 

06D 

00 

02 

0175 

PO 

06E 

09 

Q2 

017 6 

PO 

Q6F 

00 

02 

0177 

PD 

070 

00 

02 

0178 

PO 

071 

00 

01 

0179 

PO 

072 

OQ 

01 

0180 

PO 

073 

00 

02 

0181 

PO 

074 

00 

01 


- 9 - 

«■ 

Sf- 


IOT02 


BIT »15»1 4-12»ll’i‘10’^0 9^0 8-0 7«-OD’^0 5 » 

♦X »ZERO ^^P6»P5»P4^P3»P2»P1’NBR OF PARAMETERS 
X IS THE OPTIMAL PARAMETER WHICH MAY OR- MAY NOT BE PRESENT 


VFD 

NlQ/$2aa ,N6/4 

0 

CC 

VFD 

N10/$20fl ,N6/4 

41 

CM 

VFD 

N10/0,M6/3 

+ 2 

CP 

VFD 

N10/S200 ,N6/4 

+3 

CL 

VFD 

M10/4,M6/5 

44 

PL 

VFD 

N10/4,M6/5 

45 

PC 

VFD 

NlQ/8,M6/6 

46 

P8 

VFD 

N10/0,M6/4 

47 

PP 

VFD 

NlD/4,M6/5 

48 . 

PH 

VFD 

M10/$20 4,N6/6 

4 9 

ML 

VFD 

N10/$20 4,N6/6 

410 , 

MC 

VFD 

N10/$20 8,N6/7 

411 

MB 

VFO 

N10/4,M6/5 

412 .. 

HM 

VFD 

N10/4-,M6/5 

413 

MP 

VFO 

M10/$200,N6/3 

414 

VCC 

VFD 

NlO/0 ,Mb/2 

415 

VCP 

VFD 

N10/$200iN6/4 

416 

VCM 

VFD 

N10/0,N6 /2 

+ 17 

VPP 

VFD 

NlO/0 ,N6/3 

+ 13 

VHP 

VFO 

N10/0,M6/3 

+ 19 

VMM 

VFD 

N10/Q,N6/2 

420 

TAF 

VFD 

Nlfl/a-,N6/2 . 

421 

TAR 

VFO 

N10/0,N6/2 

+ 22 

TBF 

VFD 

NlO/0 ,M6/2 

423 

TBR 

VFD 

N10/Q,N6/1 

424 

, TRW 

VFO 

N10/0,M6/1 

+ 25 

TEF 

VFD 

NlD/0,N6/2 

426 

TSD 

VFD 

NlO/0 ,M6/1 

4 27 

TUL 


M8300150 

M8300151 

N830Q152 

N3300153 

MS300154 

N830G155 

N83Q0156 

N83QQ157 

M8300158 

N83QQ159 

N83Q0160 

N3300161 

N83QQ162 

N8300163 

N8300164 

M83G0165 

N830Q166 

M83Q0167 

N830O168 

N8300169 

M330fll70 

N8300171 

N8300172 

N830Q173 

M8300174 

N8300175 

M8300176 

N8300177 

N8300178 

M8300179 

N8300180 

M83QC181 


0183 

0184 

0185 

0186 

0187 

0188 

0189 

0190 

0191 

0192 

0193 
Q19it 
0195 
019 6 
0197 
0193 
0199 


* INPUT AMO OUTPUT PARAMETER VALIOATIO N- ROUTINE TABLE- I0T03 

# 

» ■ THE I0T03 IS INDEXED BY THE REQUEST CODE INDEX IN VOS 


P0075 

0219 

P IOT03 

ADC 

I0B3 55 

40 

CG 

P0076 

0219 

P 

ADC 

I0B355 

4l 

CM 

PD077 

0219 

P 

ADC 

IOB355 

42 

CP 

PG078 

0219 

P 

ADC 

108355 

43 

CL 

PG079 

0 2 0-4 

P 

ADC 

103315 

4 4 

PL 

P007A 

0204 

P 

AOC 

I0B315 

4 5 

PC 

P007B 

01F3 

P 

ADC 

IOB300 

46 

PB 

poorc 

0219 

P 

AOC 

IOB355 

+7 

PP 

P007D 

0204 

P 

ADC 

IOB315 

48 

PM 

PO 07E 

02 04 

P 

AOC 

I0B31 5 

49 

ML 

P007F 

0204 

P 

ADC 

IOB315 

410 

MC 

P008Q 

01F3 

P 

ADC 

IOB300 

411 

MB 


N8300183 

M3300184 

M8300185 

M8300186 

N3300187 

M8300188 

M8300189 

M8300190 

N8300191 

M8300192 

N8300193 

N3300194 

M8300195 

N8300196 

N8300197 

N8300198 

N8300199 
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GPOO 

P0081 

0204 

P 

ADC 

I0B315 

♦•12 

HM 

N83002DO 

0 20 1 
0202 

PO 082 

0204 

P 

» 

ADC 

I0B31 5 

+ 13 

HP 

N830Q201 

N830Q2Q2 

0203 

P0083 

0223 

P 

ADC 

I0B362 

♦ 14 

ycc 

N83QQ203 

D204 

P0Q84 

0223 

P 

ADC 

I0B362 

+ 15 

VCM 

N83002G4 

0205 

P0065 

0220 

P 

ADC 

IOB360 

+ 16 

VCM 

N830 0205 

020 6 

P0 086 

0210 

P 

ADC 

IOB340 

+ 17 

VPP 

N83Q02G6 

0207 

P0087 

0220 

P 

ADC 

IOB360 

+ 18 

VHP 

N83a02Q7 

0208 

0209 

P0088 

0220 

P 

s- 

ADC 

IOB360 

+ 19 

yMM 

N830 0208 
N830G209 

0210 

P0089 

0566 

P 

ADC 

lorioo 

+ 20 

lAF 

N83B0210 

0211 

PD08A 

0566 

P 

ADC 

lorioo 

+ 21 

lAR 

N8300211 

0212 

PflOSB 

0566 

P 

ADC 

lOf 100 

+ 22 

TBF 

N830Q212 

0213 

P0Q8C 

0 5 66 

P 

ADC 

lorioo 

♦ 23 

TOR 

N8300213 

0214 

P0 08D 

0623 

P 

ADC 

lOfREW 

♦ 24 

TRW 

N8300214 

0215 

P0 08E 

0625 

P ^ 

ADC 

lOTEOF 

♦ 25 

TEF 

. N8300215 

0216 

PD06F 

0 5 75 

P 

ADC 

lOTllO 

+ 26 

TSO 

N8300216 

0217 
021 8 

P0090 

0621 

P 

AOC 

lOTUL 

♦ 27 

TUL 

H8300217 

N8300216 


0220 










N830 0 22 0 

0221 






INPUT 

ACTION TABLE - 

IOT04 


, N83G0221 

0222 










N8300222 

0223 

PC091 

4320 


I0TG4 

ALF 

1,C 

+ 0 

C 

CARO READ ROUTINE 

. N8300223 

0224 

P0092 

03FA 

P 


ADC 

IOC 




N830 0224 

0225 

P0Q93 

4D20 



ALF 

1,H 

♦ 2 

M 

MAG TAPE READ ROUTINE ' 

N8300225 

0226 

P0094 

0 4 50 

p 


ADC 

ION 




N8300226 

0227 

P0095 

5020 



ALF 

1,P 

♦ 4 

P 

PAPER TAPE READ ROUTINE 

N3300227 

0223 

P009& 

04DF 

P 


ADC 

I OP 




N8300228 

0 22 9 

P0097 

8000 



NUM 

$8000 

END OF 

TABLE 


N83C 0229 

0230 

PD098 

0 5 59 

P 

IOT04T 

ADC 

I OF 


T 

TAPE MOTION CONTROL 

N8300230 


0232 




if- 






N8300232 

0233 





INPUT 

UNIT 

ACTION TABLE FOR THE 

VXX 

REQUESTS - IOT05 

' N5300233 

0234 




-3f. 






N830C23L 

0235 

P0099 

43 20 


lOT 05 

ALF 

1,C 

♦ 0 

C 

CARD READ ROUTINE 

N8300235 

0236 

P009A 

03FA 

P 


ADC 

IOC 




N83G0236 

0237 

P0098 

402 0 



ALF 

1,M 

+ 2 

M 

MAG TAPE READ ROUTINE 

N8300237 

0238 

P009C 

Q 4 50 

P 


ADC 

I OH 




N8300238 

0239 

PC109D 

5020 



ALF 

l^P 

+ 4 

P 

PAPER TAPR READ RIUTINE 

N8300239 

0240 

PQ09F 

Q4DF 

P 


ADC 

I OP 




N83B0240 

0241 










N8300241 

0242 

P009F 

8000 



NUM 

$8000 

END OF I0TQ5 



N8300242 

0243 

PQOAO 

0999 

P 

IOT05A 

ADC 

IOT05 




N83Q0243 
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0245 









N8300245 

0246 









N8300246 

0247 





ACTUAL ENTRy TO UTILITY 


N8300247 

0248 









N83QQ248 

0249 





SET 

UP REMAINDER 

OF UNPROTECTED CORE FOR 


N8300249 

0250 





I/O 

BUFFERS 



N830025G 

0251 





PICK 

UP NEXT lOUP 

REQUEST FROM STANDARD INPUT 


N8300251 

0252 









N8300252 

0253 









N8300253 

0254 

POOAl 

COOO 


lOQOl 

LDA 

=XIOV 



N8300254 


P00A2 

00 02 

P 







0255 

P00A3 

6 OFF 



STA- 

I 



N83G0255 

025 6 

POOA4 

COEC 



LDA- 

THIAUC 

TEMPORARY HIGHEST UNPROTECTED 

LOCATIONS 1 

N830Q256 

0257 

P00A5 

9QQD 


8UFST 

SUB 

= XI0S42V 



N8300257 


P00A6 

0AA7 

P 







0258 

P00A7 

0 9 9C 



INA 

-99 

NUMBER OF LOCATIONS AVAILABLE 

IN REMAINDER 

N830Q258 

0259 







OF UNPROTECTED - ROOM FOR ONE 

SECTOR 

N8300259 

0260 

P00A8 

E8F0 



LDQ^ 

BUFSTfH 



N8300260 

0261 

P00A9 

0002 



INQ 

2 



N8300261 

0262 

POOAA 

4136 



STQ- 

\7A8UF,I 

■BUFFER STARTS AT END OF lOUP 


N8300262 

0263 

POQAB 

OF 41 



ARS 

1 

DIVIDE BUFFER AREA IN HALF 


Na3Q0263 

026 4 

POO AC 

6120 



■ STA- 

¥32,1 

THIS IS THE LENGTH OF THE I/O 

BUFFERS 

N830Q264 

0265 

POOAO 

Q832 



• AAQ 

Q 



N8300265 

0266 

PGOAE 

4138 



STQ- 

V\?8UF,I 

BUFFER USED IN VERIFY REQUESTS 


N8300266 

0267 

POOAF 

0832 



AAQ 

Q 



N83Q0267 

0268 

PQOBG 

48 0 0 



STQ 

I0S25C 



Na3Q0268 


P0081 

0 8 66 








0269 

P00B2 

4137 



•STQ- 

¥DBL,I 

BUFFER USED FOR CONTROL DATA BLOCK SECTOR 

N8300269 

0270 

POO 83 

C0F9 



LDA- 

$F9 

IS STD. INPUT THE SAME UNIT AS 


N8300 270 

0271 

P0QB4 

9QFC 



SUB* 

SFC 

STD. COMMENT 


N83C0271 

0272 

P00B5 

QlQl 



SAZ 

lOOlO 



N8300272 

0273 

POOB6 

181E 



JMP» 

10150 

NO, DON'T SOLICIT REQUEST 


N8388273 

0274 

P0DB7 

54F4 


lOSlO 

RTJ- 

{AMONIJ 



N8300274 

0275 

P00B8 

4COO 


lOlOO 

NUM 

$4000 

+0 RC F WRITE 


N830Q275 

0276 

P00B9 

00 BF 

P 


ADC 

10120 

+ 1 GA 


N8300 276 

0277 

POO BA 

00 0 0 


10105 

ADC 

0 

+ 2 THREAD 


N83002F7 

0278 

POOBB 

18FC 


I01Q6 

NUH 

$18FC 

4-3 y,^f,A,LU 


N83C0278 

0279 

POCBC 

00 06 



NUM 

6 

+4 NO OF WORDS 


N8300279 

0280 

POOBD 

one 

P 


ADC 

I0MS3 

>f5 START ADDRESS 


N3300280 

0281 

PDOBE 

14EA 



JMP- 

(AQIS F) 



N83Q0281 

0262 









N8300282 

0263 

POOBF 

C8FB 


10120 

' LDA^ 

10106 

CHECK ERROR 


N8300283 

0284 

POGCO 

0121 



SAP 

1013 0 

SKIP IF NO ERR 


N83Q0284 

0285 

PGCGl 

14EA 


10125 

JHP- 

(AOISF) 



N830O285 

028 6 









N83Q0286 

026 7 





■SOLICIT THE lOUP 

REQUEST- SEND OUT NEXT 


N9300287 

0288 









N83Q0288 

0289 

P00C2 

0 6 44' 


10130 

CLR 

A 


63 138 3 

N83Q8289 

0290 

P00C3 

6800' 



STA 

I0S34X 


63^1383, 

N830G 290 


P0 0C4 

070E 








0291 

P0 0C5 

CO F9 



LDA- 

$F9 

IS STD INP SAME UNIT AS - 

63»-1383 

N8300291 

0292 

P00C6 

90FC 



SUB- 

SFC 

STD. COMMENT 


N83QG292 

0293 

P00C7 

0101 



SAZ 

10131 



N8300293 
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o 

0294 

PO0C8 

laoc 



JMP» 

10150 

NO, DON*! SOLICIT REQUEST 

N8300294 


0295 

P0CC9 

54F4 


10131 

PTJ- 

{AMOND 


N830 0 295 


029 6 

PODCA 

4C0 0 



NUM 

S4C00 

i-0 RC FWRI TE 

N830 0 29 6 


0297 

PQOCB 

OODl 

P 


. AOC 

10140 

hH ca 

N83Q0297 


0298 

POOCC 

0000 


10135 

ADC 

0 

+2 THREAD 

N8300298 


0299 

POOCD 

18FC 


10136 

MUM 

$18 FC 

V3 V ,M,A,LU 

N830 0299 


0300 

POOCE 

DO 05 



NUM 

5 

+4 NUMBER OF WORDS 

N830 0 30 0 


0301 

POCCF 

0122 

P 


ADC 

I0MS4 

. -1-5 START ADDRESS 

N83003D1 

U 

0302 

POODO 

14EA 



JHP- 

(A3ISFJ 


N830 0 30 2 


030 3 




» 




N830 0 30 3 


0304 

POOOl 

C8FB 


10140 

LOA* 

10136 

CHECK ERRORS 

N830D304 


030 5 

PQ 0D2 

0121 



SAP 

10150 

SKIP IF NO ERROR 

N3 3 0 0 30 5 

u 

030 6 

P00D3 

18 ED 



JMP» 

10125 

ERROR 

N83Q 0 30 6 


0307 




V- 




N8300307 


030 8 





GET 

THE OPERATOR INPUT VIA COMMENT DEVICE 

N8308308 

o 

030 9 








N83003S9 

031 0 




•■jf 




N830031D 


0311 





CLEAR THE lOUP 

REQUEST BUFFER lOBUFl FOR READING A NEW REQUEST 

N8300311 


0312 








N8300 312 

o 

0313 

POODh 

0C27 


10150 

ENQ 

39 


N831]Q313 


0314 

PO 0D5 

0 8 44 



CLR 

A 


N33Q 0 314 


0315 

P00D6 

6A 0 0 


10151 

STA 

I0BUF2, Q 


N83G 0 31 5 



P0 007 

0902 








0316 

P 0008 

01 42 



SQZ 

10152 

SKIP ALL DONE 

N8300316 


031 7 

P0009 

ODFE 



INQ 

-1 


N8300317 


0318 

POODA 

IBFB 



jHPv 

10151 


N830 0318 


0319 








N33Q0 319 


0320 

POO DB 

54F4 


10152 

RTJ- 

(AMONIJ 


N8300320 


0321 

POflOC 

4800 



NUM 

$4800 

+0 RC FREAD 

N830 0 321 


0322 

POODD 

0DE3 

P. 


AOC 

I016D 

+ 1 C A 

N8300322 


0323 

POODE 

ODOG 


10155 

ADC 

0 

+2 THREAD 

N830 0 323 


0324 

POODF 

1BF9 


101 55 

NUM 

$18F9 

«-3 V,M,A,LU 

N83Q0324 


0325 

POOEO 

0014 



NUM 

2D 

+4 NUMBER OF WORDS 

N830.Q32 5 


0326 

POOEl 

0AA9 

P 


ADC 

I0BUF2 

■)t-5 STARTING ADDRESS 

NS30Q326 


032 7 








N830G327 

o 

0328 

0329 

P00E2 

14EA 



JMP- 

f ADIS PI 


N3300328 

N83SQ329 


0330 

PG0E3 

C8FB 


10160 

LDA'» 

10156 

CHECK ERRORS 

N83QQ33G 


0331 

PO 0E4 

0121 



SAP 

10165 

SKIP IF NO ERRORS 

N83B 0 331 

o , 

0 33 2 
0333 

P00E5 

18DB 



JHP» 

IQ125 

ERROR 

N8309 332 
N8300333 


033 4 

PQ0E6 

COFC 


10165 

LOA- 

$FC 

IS STD. INPUT THE SAME UNIT AS 

N830G334 


0335 

P00E7 

90F9 



SUB- 

$F9 

STO. COMMENT 

N83G0 335 


0336 

PC0E8 

OlOC 



SAZ 

10170 

YES, GO VALIDATE BEQUEST ■ 

N830Q336 

U , 

0337 

P0DE9 

54F4 


10167 

RTJ- 

I AM ON 1 1 

COPY INPUT STATEMENT TO PRINTER 

N8300337 


0338 

PaOEA 

4C0 0 



NUM 

$4300 


N830 0 33 8 


0339 

POflEB 

OOFl 

P 


AOC 

.10169 


N830 0 339 

r\ 

0340 

POOEC 

coco 



ADC 

•0 


N83Q 0 340 

D 

0341 

POOEO 

18FB 


10168 

NUM 

S18FB 


N830 0 341 


0342 

POflEE 

0014 



NUM 

20 


N 830 0 342 


0343 

POOEF 

0AA9 

P 


AOC 

I08UF2 


N8300343 


0344 








N83Q 0 344 

O 

0345 

POOFO 

14EA 



JMP- 

{AOISP5 


N8300345 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 
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0346 





10168 

10226 

I0S411 


0347 

0348 

0349 

PDOFl 

P00F2 

P00F3 

POOF4 

CBFB 
680C 
6400 
0A39 P 

10169 

LDA’-^^ 
STA^ 
STA + 


0350 

0351 

0352 

0353 

0354 

0355 

0356 

P00F5 

1844 

# 

10170^. 

-» 

JMP» lOeOO TO \?ALIOAT£ THE REQUEST 

TO SEND OUT A REJECTEO REQUEST MESSAGE. 
INVALID REQUEST MESSAGE 

0357 
0353 
0359 
0 35 0 

POOF6 

POOF7 

C83F 

1802 

I020Q 

LDA^ lOMSlL 
JMP» 10220 

FORMAT INCORRECT MESSAGE 

0361 

0362 

P00F8 

C83E 

10210 

LOA^ 

I0MS2L 


0363 

0364 
0355 

P00F9 

PDOFA 

6807 
54F4 - 

10220 

■» 

STA^ 
■ RTJ- 

10227 

(AMONI) 

+ 0 i?;C F WRITE 

0366 

POOFB 

4C00 

10222 

■ NUM 

$4COO 

0367 

PODFC 

0102 P 


ABC 

10235 

^1 CA 

0368 

POOFD 

0 000 

10225 

ADC 

0 

+2 THREAD 

0369 

POGFF 

18FC 

10226 

NUM 

$18FC 

V,M,A,LU 

0370 

POOFF 

QflOB 


NUM 

11 

+4 NO OF WORDS 

0371 
037 2 

POlOO 

0 0 0 0 

10227 

'■» 

' ADC 

0 

+5 START AOQRESS 

0373 
0 37 4 

PCIOI 

14EA 


JHP- 

<A0ISP? 

CHECK ERROR 

0375 

PQ1B2 

C8FB 

10235 

LDA'^ 

10226 

0376 

P01Q3 

0121 

SAP 

10240 

SKIP IF NO ERROR 

0377 
037 8 

P0104 

16 BC 

■if- 

JMP» 

10125 

ERROR 

0379 

03BO 

0381 

0362 

P0105 

18BC 

10240 

JMP^ 1013 0 
MESSAGES OUTPUT BY 

GET NEXT REQUEST. 
THE lOUP 

0383 

0384 

PGIO 6 
P0107 
P0108 
P01G9 
POlOA 
POlOB 
POIOC 
PfllDD 
POlOE 
PDIOF 
POllQ 

5554 
2 0 49 
4E56 
41 4C 
4944 
20 52 
4551 
5545 
5354 
2020 
20 00 

lOMSl 

ALF 

NUM 

ig,lJT INVALID 
$2000 

REQUEST 

0365 

0386 

POlll 
P0112 
P0113 
poll 4 

5564 
2 0 46 
4F52 
4041 

I0MS2 

ALF 

10, UT FORMAT 

INCORRECT 


N83QQ346 
N8300347 
N830 0348 
N83Q0349 

N830G35D 
N83Q0351 
N830Q 352 
N830Q353 
N830D354 
N830 0 35 5 
N83G0356 
N83QD357 
N830Q358 
N8300359 
N830 0 350 
N8300361 
N8300362 
N8300363 
N8300364 
N8300365 
N830Q366 
N8300367 
N8300368 
N8300369 
N830B372 
N8300371 
N8300372 
N8300373 
N83B0374 
N8300375 
N830Q376 
N33BG377 
N830O378 
N830Q379 
N830Q38e 
N8300381 
N8300382 
N8300383 


N83Q0384 

N83G0385 

N8300386 


I0UPV4 


PAGE iO 


DATE'l 


08/19/99 



P0115 

5420 






P0116 

494E 






P0117 

43 4F 






P0118 

52 52 






P0119 

4543 






PQllA 

5 42 0 





G387 

P0118 

2QD0 



NUM 

$2000 

0388 







0389 

POllG 

5554 


I0MS3 

ALF 

5tUTILITY IN 


POllD 

494C 






POllE 

4954 






POllF 

5920 






P0120 

494E 





0390 

P0121 

2000 



NUM 

$2000 

0391 







0392 

P0122 

4E45 


lOM S4 

ALF 

4, NEXT lOU 


P0123 

5854 






P0124 

2 0 49 






P0125 

4F55 





0393 

P0126 

2Q0D 



NUM 

$2000 

0394 







0395 

P0127 

4F55 


I0HS5 

ALF 

2, OUT 


P0128 

5420 





0396 

PQ129 

200D 



NUM 

$2000 

0397 







0398 







0399 

PD12A 

494E 


I0HS7 

ALF 

10, IN/OUT ERROR LU 


PD128 

2F4F 






P012C 

5554 






P012D 

2045 






P012E 

52 52 






P012F 

4F52 






P0130 

20 4C 






P0131 

5520 






P0132 

4E4E 






P0133 

4E4E 





0400 

P0134 

2000 



NUM 

$20 00 

040 1 







0402 

PQ135 

0106 

P 

lOHSlL 

ADC 

lOMSl 

04 03 

P0136 

Qlli 

P 

I0HS2L 

ADC 

I0MS2 

0404 

PQ137 

012A 

P 

I0MS7L 

ADC 

I0MS7 

0405 

P0138 

0 5BE 

P 

I0MS8L 

AOC 

IOMS8 


N8300387 

N8300388 

N33Q0389 


N8300390 

N8300391 

N830Q392 


N8300393 

N8300394 

N8300395 

N830039& 

N8300397 

N8300398 

NNNN N8300399 


N83004GC 
N330IJ^*01 
N33QflAC2 
N330B4D3 
N830 0 A0% 
N8300 A05 


o 

o 

o 

o 

o 

o 
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O 

O 

O 

O 

o 

o 

o 

o 

o 


0^07 

0408 

0^*09 

0410 

0411 
0 412 

0413 

0414 

041 5 

0416 

0417 

0418 

0419 
Q420 

0421 

0422 

0423 

0424 

0425 

0426 

0427 

0428 
0u29 

0450 

0431 

0432 

0433 

0434 

0435 
0 43 6 
0437 
0 43 8 
0 43 9 

0440 

0441 

0442 

0443 

0444 

0445 

0446 

0447 

0448 

0449 

0450 

0451 

0452 


P0139 
P013A 
P013B 
P013C 
P013D 
P013E 
P013F 
P0140 
PO 141 
P0142 
PQ143 
P0144 
P0145 
PO 146 
P0147 
P0148 
P0149 


P014A 

P014B 

P014G 

P014D 

P014E 

P014F 


E800 
FEC7 
0 8 44 
6A00 
FEC5 
OOFE 
6AQ0 
FEC2 
ODFB 
6A00 
FEEF 
ODDF 
0151 
ODFE 
ODIF 
0171 
18F8 


0C5F 
6E0 0 
FEED 
0142 
OOFE 
18FB 


P0150 

P0151 

P0152 

P0153 

P0154 
P0155 
P0156 
P0157 
P0158 
P0159 
P015A 
P015B 
P015C 
PO 150 


tf- 

If 

10800 


IOB02 


EB08 
00 02 

40FF 

E136 

5800- 
0139 
CIOD 
09FB 
0136 
0113 
El OA 
4109 
1821 
09FD 


THE REQUESTt WITH THE P AR AHETERS » IS IN lOBUFl. 

INITIALIZE THE VARIABLES USED TO VALIDATE ANY lOUP REQUEST 


LDQ lOV 


LENGTH OF THE VARIABLE FIELD TO BE RESET TO 0 


CLR 

STA 

INQ 

STA 

INQ 

STA 

INQ 

SON 

INQ 

INQ 

SQH 


IOV01,Q 

-1 

lOVOljQ 

-4 

IOV01->Q 

-32 

1 

-1 

31 

IOB04 


DON^T CLEAR VVBUF, VABUF, OR VQBL 

DON'T CLEAR V32, 1 -EITHER 
ALL RESET TO 2ER. SKIP 


-»• 

If 

IOB04 

IOB05 


-» 

If 

If 

If 

If 

lOBlO 0 


JMP» IOB02 

CLEAR THE 13 UP CONTROL BUFFER I0BUF3 FOR THE CURRENT REQUEST 
ENQ 95 

STA UOVOlt-VDBL-l )-,Q 


SKIP ALL DONE 
OTHERWISE LOOP 
GET THE NEXT PARAMETER WHICH IS THE REQUEST CODE. 


SQZ lOBlDQ 
INQ -1 
UMP» I0BQ5 


THE REQUEST CODE CONSISTS OF 2 OR 3 ALPHA -CHARS, nnu 
FOLLOWED BY A COMMA. IF A 3 ALPHA CHARACTER CODE THE 
FIRST CHARACTER MUST BE A TTMOTION CONTROL REQUESTSI 
VtVERIFYJ OR OUT 

LDQ =XIOV 


ANO^ IS 


STO- 

L D Q— 

RTJ 


-VABUF, I 
IOS3 


I031Q2 INA 


LDA- V13,I 
INA -2 
SAH 1081.05 
SAN 108102 
LQQ- V10,I 
STQ- V09,I 
JHP» 108122 
-2 


REQUEST BUFFER ADDRESS 


CHAR COUNT 

REJECT IF 1 CHAR CODE 
FOR MORE THAN 2 CHARS 
FOR 2 CHAR CODE - 


N830Q 407 
N330Q 408 
N8300409 
N8300410 
N83Q0411 
N8300 412 

N8300413 

N833G414 

N8300415 
N830 0 416 

N830Q417 

N8300418 


N830 

N830 

N830 

N830 

N830 

N83Q 

N830 

N830 

N830 

N830 

N830 


0 419 
0 42 0 
0 421 
0 422 

0423 

0424 
0 42 5 
0426 
0 427 
0 42 8 
0 42 9 


N830Q430 
N8300431 
N83G 0 432 
N8300433 
N83Q 0 434 
N83Q0435 
N830 0 436 
N8300437 
N8300438 
N83Qfl439 
N8300440 

N830O441 
N8300442 
N8300443 
N8300 444 

N830 0 445 
N8300 446 
N83D0447 
N83G0448 
N8300449 
N830045G 
N83Q0451 
N3300452 


u 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 
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r") 


o 


o 


o 


o 


•o 


o 


o 


o 


o 


o 


o 


0453 

0454 
O'+S 5 
045 6 

0457 

0458 

0459 

0460 

0461 

0462 

0463 
0 464 

0465 

0466 

0467 
046.8 
0469 
G47.0 

0471 

0472 

0473 

0474 

0475 

0476 

0477 

0478 

0479 

0480 

0481 

0482 

0463 

0464 

0485 

0486 

0487 

0488 

0489 
049 0 

0491 

0492 

0493 

0494 

0495 


P015E 

PD15F 


0131 

1896 


P0172 

P0173 

P0174 

P0175 

P0176 

P0177 


EIQA 

ClOB 

0FE8 

4109 

OAOE 

1006 


■ IOBlO-5 
■# 

»■ 


SAM lOBllO 
JMP-» 10200 


FOR 3 CHAR CODE 
REJECT. MORE THAN 


3 CHARACTER CODE 


CHECK. 3 CHAR REQUEST. TO BE EITHER 
l.,$OUT,i?CC,l/CP,VCM,VPP, VPM.VMM 

2. $TA'^ ,TAR,TBF,TBR,TRW,TEF,TSD 


P0160 

ClOA 

lOBllQ 

LBA- 

VIO, I 


P0161 

BQCD 


EOR 

=N$4F55 


P0162 

4F55 




SKIP IF TWO CHARS ARE 

P0163 

0116 


SAN 

108111 


CHECK THIRD CHAR 

TO BE T 

P0164 

ClOB 


LDA- 

V11,I 


P0165 

AQ lA 


AND- 

NZERO+8 


PG166 

BO GO 


EOR 

=N$5400 


P0167 

5400 




SKIP IF NOT T- REJECT 

P0168 

0113 


SAN 

IOB112 



FOR A 

VALIDATED 

OUT REQUEST RELEASE lOUP 

P0169 

14EA 

JMP- 

(ADIS F'} 


P016A 

ClOA 

lOBltl 

L0A- 

ViO ,I 

CHECK IF FIRST CHAR IS 

P0168 

AOIA 


AHQ- 

NZEROrt-8 

CHAR T 

P016C 

BQOO 


EOR 

=N$5400 

P016D 

5400 




SKIP IF A F 

P016E 

0109 


SAZ 

lOBli 5 

PQ16F 

B0 2C 


EOR- 

ONEBITi-9 

CHECK FOR CHARACTER V 

P017 8 

0101 


SAZ 

I0B113 

SKIP IF V 




OTHERWISE REJECT 


PQ171 

18ED 

IOB112 

JMP» 

I OBI 0 5 



* 

w 

I0B113 


1 0 

0 49 7 




THE 

TABLE 

0498 







0499 

P0178 

ElOA 

IOB115 

LDO- 

VIO, 


0500 

P0179 

ClOB 


LDA- 

Vll , 

' o 

0501 

P017A 

0FE8 


LLS 

8 

0502 

PQ17B 

4109 


STQ- 

VG9, 


SET UP FOR VALIQ VXX CODE 

FOR THE CHARACTER V 

LQQ” V1Q,I 
LDA- V11,I 
LLS 8 
STG- V09., I 
ENA 14 
JMP» I0B122 

RE-ARRANGE THE REMAINING THO CHARS FOR CHECK AGAINST 
- VALID REQUEST CODES. 

FIRST TWO CHARS 
THIRD CHARACTER 

LAST 2 CHAR OF THE 3 CHAR REQ CODE TXX 
REQ CODE FOR VERIFICATION 


o 


O 


N8300453 
N8300454 
N83D0455 
N830 0456 
N330Q457 
N830Q458 
N83B0459 
N8300 460 
N830Q461 

N83Q.8 462 
N8300463 
N8300464 
N8300465 
N8300466 

N8300467 
N03OO 468 
N8300<+69 
N3300470 
N8300 471 
N8300 472 
N8300473 
N830047M 
N8300475 

N330D476 
N830S477 
NdSOO'+ZS 
N3300 479 
N85Q0480 
N8300481 
N8300482 
N83Q0483 
N830 0 484 
N83G0485 
N8300486 
N8300 487 
N8300488 
N8300489 
N3300490 
N8300 491 
NS300 492 
N8300493 
N8300494 
N830 0495 
N8300496 
N83Q0497 
N8300 498 
N830Q499 
N8300500 
N8300501 
N83Q 0502 


o 

□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


c 
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C-‘ 

o 

0503 











N8300503 

o 


050 4 

PD17C 

0A14 



ENA 

20 





N83005D4 



050 5 

P017n 

0822 


I0B122 

TRA 

Q 





N83Q 0 505 


o 

0506 

P017E 

CAQO 


I0B124 

LDA 

lOTOl ,Q 





N83C0506 

o 


P017F 

FEBD 











0507 

PG18 0 

AOll 



AND- 

LPMASKH5 





N830 0507 



0508 

P0181 

B109 



EOR- 

V09,I 

GIVEN REQUEST CODE 




N8300 508 


o 

0509 

P016 2 

0106 



SAZ 

108130 

MATCH FOUND IN TABLE. 




N8300 509 

o 

0510 











N83D051D 


0511 





CHECK END OF VAIIO CODES 




N8300511 



. 0512 











N8300 512 


o 

0513 

PG183 

CAOO 



LDA 

IOT01,a 





N8300513 

o 


P0184 

FEB8 











0514 

P0185 

0121 



SAP 

108125 

SKIP NO END OF TABLE 




N8300514 



0515 

P0186 

18D8 



JMP* 

IOB105 

REJECT NO MATCH FOUND 




N830 0S15 


o 

0516 











N8300516 

o 

0517 





UPDATE rO NEXT 

ENTRY IN THE REQUEST CODE TABLE 




N830Q517 


051 8 




¥ 







N8300518 



0519 

P0187 

ODOl 


108125 

INQ 

1 





N8300519 


o 

052 0 

P0188 

18F5 



JMP^ 

108124 





N830052D 

o 

0521 











N83Q0521 


0522 




' 9 - 

FOR 

A VALIDATED 

REQUEST CODE, SAVE THE REQ CODE 

INDEX 


N83D 0 522 



0523 











N83Q 0523 


o 

0524 

PQ189 

4129 


IOB13-0 

STQ> 

V08,I 





N8300524 

o 

0525 










N330Q525 


0526 





GET 

THE SPECIFIED NUMBER OF PARAMETERS FOR THE 

GIVEN 

REQUEST 

N8300526 



0527 










N8300527 


o 

0 523 

PQ18A 

£12 9 



LDQ- 

VOS, I 

REQ CODE INDEX 




Na3Q0528 

o 

0529 

P.018B 

CACO 



LDA 

IOT02,Q 




N8300529 



P018C 

FECC 












0530 

P018D 

AD 09 



AN'O- 

iPMASK!^7 





N830 0 53Q 


o 

0531 

P018E 

6115 



STA- 

V21 ,I 

NUMBER OF PARAMETERS REQD FOR 

THE 

REQUEST. 

N830Q531 

o 

0532 










N8300 532 


0533 





COMPUTE THE SCRATCH AREA AyA-ILABLE FOR THE GIlfEN 

REQUEST AND 

N8300 533 



0534 





SAVE 

IT IN V42 





N3300534 


o 

0535 





FOR 

ALL REQUESTS IT IS MAXSEC-($C1) 




N838C53 5 

-■ o 

0536 











N830 0 536 


0537 

PQ18F 

E400 

X 


LDQ 

MAXSEC 

SAVE SCRATCH AREA SIZE 



61»1283 

N830O537 




P0190 

7FFF 

X 










o 

0538 

P0191 

C0B3 



LDA- 

$B3 

CHECK SCRATCH, LIBRARY 




N8300538 

o 

0539 

PQ192 

90C2 



SU8- 

$G2 

LU'S DIFFERENT 




NS3G0 539 


0540 

P0193 

OFFO 



LLS 

16 





N8300540 



0541 

P0194 

0151 



SQN 

1 





N8300541 


o 

0542 

P0195 

90C1 



SUB- 

$Ci 





N83D0 542 

■ o 

0543 

P0196 

612A 



STA- 

V42,I 





N83Q0543 


0544 











N830 0 544 



0545 





GET 

THE NEXT PARAMETER 




N83BG545 


o 

0546 











N83Q0546 

o 

0547 

P0197 

5800 


IOB20 0 

RTJ 

I OS 6 





N8300547 



P0198 

018D 












0548 











N830fl548 


o 

0549 





CHECK THE 'LAST 

CHARACTER RECEIVED 




N830 0549 

o 

0550 











N830055C 

o 













o 

o 













o 
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0551 
055E 
0 553 

0554 

0555 

0556 

0557 

0558 

0559 

0560 

0561 

0562 

0563 

0564 
056 5 

0566 

0567 
0558 

0569 

0570 

0571 

0572 

0573 

0574 

0575 

0576 

0577 

0578 

0579 
058 0 

0581 

0582 

0583 
0564 

0585 

0586 

0587 

058 8 

0589 

0590 

0591 

0592 
0 593 
D59i+ 

059 5 

0596 

0597 

0598 

0599 

0600 
0601 


P0199 

ClOF 

109210 LDA- 

V15,I 


PQ19A 

0903 

INA 

-S2C 

CHECK FOR A COMMA 

PO 19B 

0111 

SAN 

I0B225 

NOT A COMMA 

PQ 19G 

18 51 

JMP* 

108260 

JUMP FOR A COMMA 

P019D 

ClOF 

. I0B225 • LDA- 

V15,I 


Pfll9E 

0106 

SAZ 

1 08 23 0 

SKIP IF END OF REQUEST 

P019F 

09DF 

INA 

-$20 


POIAQ 

0104 

SAZ 

IOB230 


POlAl 

0920 

INA 

$20 


P01A2 

80 OA 

EOR- 

LPMASK^-8 

CHECK FOR END OF REQUEST 

P01A3 

0101 

SAZ 

IOB230 

YES 

P01A4 

164C 

JHP^ 

K 

108270 

INVALID DELIMITER. REJECT 



» FOR THE END OF REQUEST PARAMETER CHECK THE NUMBER OF 



PARAMETERS SAVED 


P01A5 

ClOl . 

IOB230 LDA- 

VOlf I 

ACTUAL RECEIVED 

P01A6 

9115 

SUB- 

V21,I 

SHOULD BE 

P01A7 

0109 

SAZ 

:3L 

I0B232 




» CHECK IF THE ACTUAL PARAMETER COUNT IS LESS BY 1 



^ FOR THE REQUEST 

CIDES WHERE PERMISSI BLE 1 INDICATED 



^ BY B15 OF IOT02 

TABLE ENTRY=1) 

P01A3 

0 901 

INA 

1 


P01A9 

0116 

SAN 

:9L 

108231 

REJECT IF NOT LESS THAN BY 1 



» CHECK WHETHER MISSING PARAMETER LEGAL 

POIAA 

El 29 

LDQ^ 

V08,I 

REQUEST CODE INDEX 

PQIAB 

CADO 

■ LDA 

IOT02,Q 


POIAC 

■FEAC 




POIAD 

0122 

SAP 

I0B231 

REJECT IF MOT PERMISSIBLE 

POIAE 

0101 

RAO- 

¥ 

VOl,I 

UPDATE NBR OF PARAMS TO MAX PERMITTED 

PQIAF 

1802 

JfiP* 

¥ 

I0B232 


POIBG 

18 40 

I0B231 JMP^ 

X. 

108270 

OTHERWISE REHEGT 



» DERIVE THE FROM 

■3ft 

AND TO UTILITY ROUTINES 

POl’Bl 

C109 

108232 LOA> 

VQ9^I 

FROM, 

P0182 

AOIA 

AND- 

NZERO+8 


P01B3 

6113 

STA- 

V19»I 


PQ1B4 

flCOO 

ENQ 

0 


PQ1B5 

CAOO 

I0B235 LDA 

IOr04,Q 


P01B6 

FEDA 




PQ1B7 

0135 

SAM 

I0B237 

MOTION CONTROL REQUEST 

P01B8 

AOIA 

AND- 

NZERO+3 


P01B9 

B113 

EOR- 

V19»I 


POIBA 

0106 

SAZ 

IOB240 

MATCH FOUND 


N83G0551 
N83Q 0 552 
N8300553 
N8300554 
N3300555 
N830 0 556 
N83Q0557 
N830Q558 
N830 0 559 
N830Q56G 
N830Q561 
N8300562 
N8300 563 
N330Q564 
N8300565 
N3300566 
N8300567 
N8300568 
N8300569 
N8300570 
N83Q0571 
N8300 572 
N830G573 
N83fl0574 
N83Q0575 
N83Q0 576 
N830D577 
N8300576 
N8300579 
N83QB58G 
N8300581 
N8300582 

N8300583 
N8300584 
N 830 058 5 
N8300586 
N830G 587 
N8300588 
N83I]Q569 
N83D 0590 
N8300591 
N8300 592 
N8300593 
N8300594 
N83Q0595 
N830D596 
N8300597 

N8300598 

M83Q0599 

N830060C 

N83QQ601 


I0UPV4 
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060 2 

PO 18B 

0D02 


INQ 

2 

OTHERWISE TRY NEXT ENTRY 

N83Q0602 

0603 

POIBC 

18 F8 


JMP» 

I0B235 


N830 Q 60 3 

0604 

PQIBO 

E8 0 0 

108237 

LOQ 

IOT0 4T 

FOR THE MOTION CONTROL REQUEST 

N8300604 


POIBE 

FED9 






0605 

POIBF 

4117 


STQ- 

V23,I 


N830 06 0 5 

0606 

PC ICO 

1622 


JMP- 

IZEROTt Q 


N83 Q 06 0 6 

0607 

POICI 

QQOl 

108240 

INQ 

1 


N33Q 0 60 7 

060 8 

P01G2 

CAOO 


LOA 

IOT04,Q 


N830 0 60 8 


P01C3 

FECD 






0609 

P01C4 

5117 


STA- 

V23 ,I 


N830B6G9 

061 0 

P01C5 

Cl 09 


LDA- 

V09»I 

TO CHARACTER 

N830 0 61 G 

0611 

PQ1C6 

AO OA 


AND- 

LPHASK»-8 


N83i0611 

0612 

P01C7 

6113 


STA- 

V19 ,I 


N330 0 612 

061 3 

P01C8 

0 9BD 


INA 

-$42 

CHECK IF OUT IS CHARACTER B - CARD^^PRINT 

N3300613 

0614 

P01C9 

0119 


SAN 

IOB250 

NOT B 

N 83 00614 

0615 

POICA 

0C03 


ENQ 

3 


N8300 615 

0 616 

POICB 

CAOO 


LDA 

IOV01,Q 


N 83Q 0 61 6 


POIGC 

FE36 






0617 

POICO 

6119 


STA- 

V25,I 


N8300617 

061 8 

POICE 

OC 02 


ENQ 

2 


N83 0 0 6l 8 

0519 

PQICF 

CAOO 


LDA 

IOV01,Q 


N330 0 619 


PO IDQ 

FE32 






062 0 

POlOl 

6118 


STA- 

V24,I 


N830 B620 

0621 

P01D2 

1812 


JMP* 

I0B25 7 


N8300621 

0622 



■* 




N830 Q 62 2 

0 62 3 




SAVE 

SECOND UNIT 

AS THE INPUT UNIT FOR VXX 'REQUESTS 

N83Q0 62 3 

0 62 4 




FOP 

OTHERS 9 0 NOT SAVE SECOND UNIT 

N83Q0624 

0625 







N8300625 

0626 

P01D3 

C129 

108250 

LOA- 

VOStI 

REQUEST CODE INDEX 

N83S0626 

0627 

PQ104 

0 9F1 


INA 

-14 


N330 0 62 7 

0628 

P01D5 

0 1 3E 


sa:h 

108257 

NOT A VXX REQUEST 

N8300628 

0629 







N830 D 629 

063 0 

P01D6 

09F9 


INA 

-6 


N830063e 

0631 

P01D7 

012C 


SAP 

I0B257 

NOT A VXX REQUEST 

N830 0 63 1 

0 63 2 







N830 Q 632 

0633 




FOR 

VXX REQUEST 

CO OF 

N 8 3 0 0 6 3 3 

0634 



♦ 

SET 

VERIFY REQUEST FLAG 

N830 0 634 

0 63 5 



»■ 




N830 0 63 5 

0636 

POlDft 

0 ACl 


FNA 

1 


N830D 636 

0637 
063 8 

PQ1D9 

6128 


STA- 

V4C , I 


N3 30 0 63 7 
N8300636 

0639 

POlOA 

E8 00 


LDQ 

IOT05A 


N83C0639 


POIDP 

FEC4 






0640 

PfllSC 

C 622 

108252 

LDA- 

(ZEROl »Q 


NS30G640 

0641 

POIDD 

OF 48 


ARS 

3 


N830 0 o4 1 

0642 

POIDE 

B1 13 


EOR- 

yi9,i 


N8 30 0 642 

0643 

POIDF 

G 102 


SAZ 

I0B255 

MATCH FOUND 

N 8 3 0 0 6 <+ 3 

0644 

POIEO 

QD02 


INQ 

2 

OTHERWISE TRY NEXT EKTRY 

N83GG64H- 

0645 

POIEI 

18FA 



I0B252 


N830 0 645 

0646 

P01F2 

C201 

108255 

LOA- 

l.Q 


N839 Ob46 

0647 

P01E3 

6118 


SIA- 

V24f I 


N830 0 647 

0648 

PQ1E4 

OG 01 

I0B257 

ENO 

1 

‘VALIDATE PARAMETER 1 AS AN 

N3300648 

0649 

P01E5 

OAOl 


ENA 

1 


N830 0649 


( ) 


I0UPV4 


o 

0650 

P01E6 

5800 




P01E7 

014E 



0651 

PD1E8 

F129 



0652 

P01E9 

FOOD 


O 


POIEA 

0 076 P 


0653 

POIEB 

E622 



0654 

POIEC 

1622 



0 65 5 





0656 



If- 


0657 



V- 


0658 



It- 

O 

0659 
065 0 





0661 





0662 

POIED 

CiOl 

IOB260 


0663 

POIEE 

9115 


U 

0664 

POIEF 

0 112 

IOB2?0 


0665 

PfllFO 

1800 



POIFI 

FF06 


o 

0566 

0667 

P01F2 

18A4 

I0B280 


0668 




o 






0570 




o 

0671 

0672 



4f- 


0673 

P01F3 

0C06 

10830 0 


0674 

P01F4 

5800 



O 

o 

o 

o 

o 

o 


RTJ 
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DATE? 08/19/99 


INPUT UNIT. 


0 67 5 

0676 

0677 
057 6 

0679 

0680 

0681 
0682 
0 683 

0684 

0685 
068 6 

0687 

0688 

0689 

0690 

0691 
Q692 


P01F5 0180 


P01F6 

P01F7 

PQ1F8 

P01F9 

POIFA 

PDIFB 

POIFC 

POIFD 

POIFE 

POIFF 

P020Q 

P0201 

P0202 


QC05 
48 5-8 

OC04 

5800 

C182 

0CG3 

QA03 

5800 

0137 

0-C02 
OA 02 
5800 
0133 


P0203 1826 
PQ204 0C05 


LDQ- \/08,I 
AOQ =XIOT03 

LOQ** [ZEROJtQ 
JMP- IZER0),Q 

COME HERE WITH THE CHARACTER COMMA 
NUMBER OF PARAMETERS SAVED IS IN VOl 
CHECK IF THE NO OF SAVED PARAHS IS MAX 


IF TES, REJECT 


LDA- VOl, I 
SUB- V21,I 
SAN IOB280 
JMP 10210 


ACTUAi 

MAXIMUM 

NOT EQUAL, OK, 
REJECT 


SET UP TO GET THE NEXT PARAMETER 
JMP» I0820D 


PARAMETER VALIDATION ROUTINES 

end 6 6TH PARAM AS A .REPEAT COUNT 

RTJ IOS8 


ENQ ‘5 
STQ* I0B9QQ 

ENQ 4 
RTJ I0S9 


108305 ENQ 3 
ENA 3 
RTJ I0S7 


IOB310 ENQ 2 
ENA 2 
RTJ 10S7 


JMP» IOB370 
I0B315 ENQ 5 


5TH PARAMETER AS A VALID NUMBER 
4TH P-ARAM AS AN ALPHA CHAR 

3RD PARAMETER AS A PRINTER UNIT 
2ND PARAH AS AN OUTPUT UNIT 


5TH PARAM AS REPEAT COUNT 


N8300650 

N8300651 

N8300652 

N83QQ653 
N8300654 
N8300655 
N83Q0656 
N830 0 657 
N8300658 
N8300659 
N830066C 
N83D0661 
M8300662 
N8300663 
N830 0 664 
N83O0665 

N8300666 

N83Q0667 

N83Q0668 


N8300670 

N8300671 

Na300672 

N830Q673 

N8300674 

N3300675 

N8300676 

N8300677 

N83SQ678 

N8300679 

N8308680 

N83SQ 681 
N8300682 
N8300583 
N8300684 

N83QG685 

N8300686 

N83QQ687 

N8300688 

N830 0689 
N8300690 
N330G691 
N830D692 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

c 

o 


o 


o 


o 


o 
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0693 

0694 

P0205 

P0206 

5800 

016F 


RTJ 

0 69 5 

P0207 

0GO4 

IOB320 

ENQ 

0696 

0697 

PQ208 

4847 


STQ» 

0698 

0699 

PG209 

180C 


JHP» 

07DO 

P020A 

0C05 

IOB330 

ENQ 

070 1 
0702 

P02QB 

P020C 

5800 
01 69 


RTJ 

0703 

P02DD 

0C04 


ENQ 

0704 
070 5 

PQ2GE 

4841 


STQ» 

0706 

0707 

P02QF 

16EB 


JMP» 


N8300&93 


070 8 

0709 

0710 

0711 

0712 

0713 

0714 

0715 

0716 

0717 

0718 

0719 

0720 

0721 

0722 

0723 

0724 

0725 

0726 

0727 
072 8 

0729 

0730 

0731 
0 73 2 

0733 

0734 

0735 


P0210 

P0211 

P0212 

P0213 

P0214 

P0215 

P0216 

P0217 

P0218 

P0219 

P021A 

P021B 

PD21C 

P021D 

P021F 

P021F 

P0220 

PQ221 

P0222 

P0223 

P0224 


0CO2 
48 3£ 

1817 
0C05 
48 3 B 

0C03 

5800 

0165 

18E6 

0CC3 
5800 
015A 
OCFE 
4832 
CO DO 
18DF 
OC03 
48 2E 
1803 

QCFE 
48 2B 


P0225 0CG2 
P0226 QAOl 
P0227 5300 
P0228 OlOD 


IOB340 


IOB350 


I0B35 2 


10835.5 


I0836Q 


I0B362 


ENQ 2 
STQ» 108900 

JHP’^ IOB370 
ENQ 5 
STQ’^ IOB9QO 

ENQ 3 
RTJ I0S9 

JHP* IOB310 

ENQ 3 
RTJ 1038 

ENQ -1 
STQ’^ IOB900 

JMP-^ IOB310 
ENQ 3 
STQ^ IOB900 
JMP» I0B365 

ENQ -1 
STO» IOB900 


I0B365 


ENQ 2 
ENA 1 
RTJ 1057 


4TH PARAMETER AS A VALID NUMBER 


5TH PARAH AS A VALID REPEAT COUNT 


4TH PARAMETER AS A VALID NUMBER 


2ND PARAMETER AS A VALID N8R 


5TH PARAM AS A VALID NUMBER 


3RD PARAMETER AS AN ALPHA CHAR 


3RD PARAM AS A VALID REPEAT COUNT 


NBR VALIDATION NOT APPLIVABLE 


3RD PARAMETER AS A VALID NUMBER 


2ND PARAH AS A VALID INPUT UNIT 


N830 
N830 
N830 
N830 
N830 
N530 
N330 
N83 0 


0694 

0595 

0696 

0697 

0698 
0 69 9 

0700 

0701 


FOR THE DATA TRAN S FER/ VERIFY REQUEST CHECK WHETHER THE DATA ^ 
HAS TO^BE WRITTEN TO (AND LATER ON READ FOR OUTPUT) THE SCRATCH 
UNIT, OR NOT, 


N8300702 
N830Q7G3 
N830 0704 
N83OQ705 
N8300706 
N8300707 
N83D0708 
N83C0709 
N8300710 
N3300 711 
N8300712 
N8300713 
N3300714 
N8300715 
N330Q716 

N8300717 

N83D0718 

N8300719 

N8300720 

N830D721 
N8300722 
N8500723 
N83O0724 
N830C725 
N8300 726 
N830 0 727 
N83GQ728 
N33Q0729 
N83QQ730 
N8300731 
N3300732 
N3300733 
N8300734 
N330 0735 

N8300736 
N8300737 
N3300738 
N8300739 
N330Q74 0 


■ n 


I0UPV4 
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DATES 08/19/99 


0741 




WHEN 

Ul.EQ.UZ . 

OR. 

M.GT.l THE DATA WILL EE WRITTEN 

TO SCRATCH, 

N8300741 

0742 




OTHE! 

RWISE IT 

WILL 

BE ON ONE RECORD XFER/COMPARE BASIS, 

N83D0 742 

0743 










N330Q743 

0744 




A FLAG 1^43} 

IS 

SET TO BYPASS SCRATCH. 


N33Q 0744 

0745 










N830Q745 

0746 

P0229 

C109 

IOB3F-0 

LDA- 

V09,I 



CHECK BOTH CHARACTERS SAME 


N830 0746 

0747 

P022A 

611E 


STA- 

W30 ,I 





N8300747 

0748 

P0 22B 

OFca 


ALS 

8 





N83Q 0748 

0749 

PD22G 

B1 IE 


EOR- 

\?3Q,I 





N8303749 

0 750 

P0 22D 

0115 


SAN 

I0B371 



SKIP IF NOT SAME. 


N830075Q 

0751 

P0 22E 

C102 


LQA- 

V024 I 



IF SAME IF U1 AND U2 ARE SAME, 


N3300751 

0752 

P022F 

9103 


SUB- 

•V03,I 





N330 0752 

0753 

Pfl 230 

0112 


SAN 

I0B371 



SKIP IF NOT SAME LU-, 


N330G753 

0754 










N83Q 0754 

0755 

P0 2^1 

0 8 42 

I0B37 A 

CLP ! 

Q 



DO NOT SET FLAG 


N 830 0755 

0756 

P0232 

1816 


JMP* 

I0B374 





N8300756 

0757 










N330Q 757 

0 758 




CHECK IF THE 

M 

PARAMETER IS GT.l.IF SO, BO NOT SET 

FLAG, 

M330 0 758 

0759 










N33Q0759 

0760 

P0233 

tiai 

I0B371 

LDQ- 

V01,I 



GET NUMBER OF PARAMETERS 


N330Q76Q 

0761 



3r 







N8300761 

0762 




IF X 

PARAMETER 

IS 

APPLICABLE TO A REQUEST THE M PARAMETER 

N8300762 

0763 




IS THE LAST 

BUT 

ONE. 


N8300763 

0754 




IF X 

IS NOT 

APPLICABLE TO THE GIVEN REQUEST THE M 

PARAMETER 

N3 30 0 76 4 

0765 




IS THE LAST 

ONE 




N3300765 

0766 










N8300766 

0767 

P0234 

C129 


LDA- 

VOS, I 



CHECK IF A verify REQUEST 


N8300767 

0768 

P0 235 

09F1 


INA 

-14 





N8300768 

0759 

PQ236 

0131 


SAH 

I0B377 



SKIP IF NOT A VXX 


N330D769 

077 0 

P0237 

1811 


JMP» 

I0B374 



JUMP FOR A VXX 


M83 0 0 77 0 

0771 










N830 D771 

0772 

P0238 

C129 

I0B377 

LDA- 

VOS, I 



REQUEST CODE 


N83G0772 

0773 

P0239 

0 9FD 


INA 

-2 





N83D0773 

0774 

P023A 

0107 


SAZ 

I0B373 



SKIP IF X NOT APPLICABLE T$CP) 


N830Q774 

0775 

P0238 

0 9FO 


INA 

-2 





N8300 775 

0776 

P023G 

0134 


SAM 

IOB372 



SKIP X APPLICABLE « $CC, $CM , $CL> 


N83GQ 776 

0777 

PQ23D 

09FA 


INA 

-5 





N83Q0777 

0778 

P023E 

0133 


SAM 

108373 



SKIP X NOT APPLICABLE t$PX) 


N8300778 

0779 

P023F 

0 9FC 


INA 

-3 





N83e0779 

0780 

P0240 

0121 


SAP 

108373 



SKIP IF X NOT APPLICABLE 


N83Q0780 

073 1 










N3300781 

0782 




FOR 

REQUESTS 

WITH 

X 


N8300782 

0783 










N8300783 

Q784 

P0 241 

ODFE 

108372 

INQ 

-1 





N830D784 

0785 










N83QQ735 

0786 

P0242 

CADO 

I0B373 

LDA 

lOVGl ,Q 





N83Q0786 


P0243 

FDBF 









0787 

PQ244 

0 822 


TRA 

Q 





N830 0 787 

076 8 

PQ245 

09FE 


INA 

-1 





N8300788 

078 9 

P0246 

0101 


SAZ 

I0B374 



SKIP TO SET FLAG NOT TO WROTE SCRATCH 

N830 0789 

079 0 

P0247 

0 8 42 


CLR 

Q 



DO NOT SET FLAG. WRITE ON SCRATCH 

N8300790 

0791 



. ^ 







N8300791 

0792 

P0248 

41 2B 

108374 

STQ- 

V43,I 





N8300792 


I0UPV4 
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DATE'S 08/ 19/99 


L.) 


O 

O 

o 

o 


0793 



0 794 

P0249 

E806 

0795 

0796 

PO 24A 

0172 

0797 

P0 24B 

5300 

079 8 

P024C 

0136 

0799 

P024D 

1800 

080 0 

P024E 

0183 

0801 
080 2 

P024F 

0000 


LDQ^ 

SQH 

jf- 

. RTJ 

IOB900 

I0B375 

lOSlO 

SKIP IF NBR VALIDATION NOT 
OTHERWISE CHECJ SCRATCJ IS 

APPLICABLE 

AVAILABLE 

N8300793 
N830 0794 
N8300795 
N830D796 
N8300797 

I0B375 JHP 

10 A 



N8300798 
N83Q 0799 

■» 

IOB900 NUM 

0 

TEMP 


■ N8300800 
. N8300801 
N83Q0802 


o 

o 

o 

o 

o 


o 


o 

o 

o 

o 


o 

o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


080 4 
0805 
080 6 
080 7 
0 80 8 

0809 

0810 
081 1 
0312 
0813 
0614 

0815 

0816 

0817 

0818 
0 8.19 
082 0 
0821 
0822 
0823 
0 82 4 

0825 

0826 

0827 

0828 

0829 

0830 

0831 

0832 

0833 

0834 

0835 

0836 

0837 

0838 

0839 

0840 

0841 

0842 

0843 
0 84 4 

0845 

0846 

0847 
0843 

0849 

0850 

0851 

0852 

0853 

0854 

0855 

0856 


100974 
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DATE; 08/19/99 


» 

■V 

»■ 

V- 

SI- 

■* 

■ 9 - 

9 - 


COMMON SUBROUTINE 

TO GET A CHARACTER FROM 

INPUT 


A BUFFER AT- ANY GIVEN ADDRESS 


IQ) = BASE ADDRESS OF THE BUFFER 
V44=INDEX TO C 
INDEX TO CHARACTER 

UPPER CHAR(B8~15) OF BUFFER-fO = CHA R. POSITION 0 

LOWER CHARiBO-7) OF BUFFER+0 = CHAR POSITION 1 

UPPER CHAR{88-153 OF BUFFER+1 = CHAR POSITION 2 

AND SO ON 

OUTPUT 

(Q) = NOT DISTURBED 

lA) BITS DO-07 = CHARACTER 
V12 = UPDATED TO REFLECT NEXT CHAR POSITION 

IB12 A-F1(B13 0-9) (B15 NOT A-Z»0-9) 


P0250 

00 00 

lOSl 

ADC 

0 ■ 

CHARACTER INDEX 

P0251 

G12C 

lOSlA 

LDA- 

V44,I 

P0252 

OF 41 


ARS 

1 

Q=WORD ADDRESS 

PQ253 

C832 


AAQ 

Q 

P0254 

4825 


STQ» 

lOSlV 


PC255 

C12C 


LOA- 

V44,I 

CHECK UPPER OR LOWER CHARACTER 

P0256 

A 0 03 


AND- 

LPMASK*-! 


P0257 

EC22 


LDQ» 

< I0S17) 

GET WORD 

P0258 

0102 

Tr 

31 

SAZ 

lOSlO 

SKIP IF UPPER CHARACTER IA=0I 

P0259 

0 814 


TRQ 

A 

GET LOWER CHARACTER 

P025A 

1803 

'Pf. 

JMP» 

lOSlE 


P025B 

0814 

IOS10 

TRQ 

A 

GET LOWER CHARACTER 

P0 25C 

0FC8 


ALS 

3 


P025D 

AOOA 

lOSlE 

ANO- 

LPMASK+8 


P025E 

61 10 


STA- 

V16»I 

UPDATE INPUT CHAR -INDEX FOR NEXT 

PG25F 

DIOC 


RAO- 

712,1 

P’Q260 

D12C 


RAO- 

744,1 

UPDATE CHAR INDEX 




CHECK IF THE 

GIVEN CHAR IS AN ALPHANUMERIC CHAR OR 

P0261 

0 9CF 


INA 

-$30 

INVALID NUM 

P0262 

0137 


SAM 

I0S14 

P0263 

09F5 


INA 

-10 

VALID NUM CHAR Q-9 

PQ264 

0137 


SAM 

IOS15 


N8300804 

N3300805 

N8300806 

N83QD807 

N830D808 

N83Q0809 

N830081D 

N83GQ811 

N8300812 

N8300813 

N3300814 

N8300815 

N8300B16 

N8300817 

N8300818 

N8300819 

N830Q820 

N830Q821 

N8300822 

N3300823 

N8300824 

N3300 825 

N33SQ 826 

N830Q827 

N8300828 

N8300829 

N8300 830 

N8300831 

N830Q832 

N830Q833 

N8300834 

N8300835 

N8300836 

N83Q0837 

N8300838 

N83Q0839 

N830084D 

N83Q0841 

N8300842 

N8300843 

N330D844 

N83G0S45 

N8300846 

N830Q847 

N8300848 

N8300849 

N8300850 

N83G0851 

N3300852 

N83Q0353 

N8300 854 

N83Q0855 

N8300856 
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0857 

PQ265 

085 8 

P0266 

0859 

PO 

267 

0860 

PO 

268 

0861 

PO 

269 

C862 



0853 



0864 



0865 

PO 

26A 

0866 

PO 

26B 

0867 

PO 

26C 

0868 

PO 

26D 

0869 



D870 



0871 



0872 

PO 

26E 

0873 

PO 

26F 

0874 

PO 

270 

0875 

PO 

271 

0876 

PO 

272 

0877 

PO 

273 

08 7 3 

PO 

274 

0879 



0880 



D881 



0882 

P0275 

0883 

PC 

276 

0884 

PO 

277 

0885 



0886 



0887 



0888 

PO 

273 

0889 



0890 

PQ 

279 

0891 




Clio 

09BE 

B132 

09E5 

0134 



«=■ 



C032 

IOS14 

180B 

C030 

IOS15 

1809 



«- 



Clio 

IOS16 

0 9E8 
0132 


0 844 
1803 
C02F 

IOS17 

18 01 






8031 

IOS18 

8110 

IOS19 

6110 




1CD7 


0000 

losiy 


LDA- Vie. I 


INA 

SAM 

INA 

SAH 


~$41 

I0S14 

-$1A 

IOS1& 


GET CHARACTER. 

A 

INVALID ALPHANUMERIC 
Z + 1 

VALID ALPHA CHAR A-Z 


INVALID ALPHANUMERIC CHARACTER 
15 

13 VALID NUM CHARACTER 0-9 


LDA- ONEBITi- 
JM!P» I0S19 
LOA- ONEBIT9- 
JMP» I0S19 


CHECK FOR A VALID A-F HEXADECIMAL CHAR 


LDA- V16,I 
INA -S47 
SAM I0S17 
CLR A 
JMP» 10318 
LDA- 0NE8IT+ 
JM?» IOS18 


12 


JUMP IF CHAR IS A-F 
ALPHA CHAR IS NOT A-F 

ALPHA CHAR IS A-F 


FOR A VALID ALPHANUMERIC CHARACTER 

ADD- ONEBIH-14 
ADD- V16,I 
SIA- V16,I 

EXIT 

JHP* (lOSl? 

NUM 0 


TEMP STORAGE 


N3300357 
N3300858 
N830Q 859 
M830086D 
N830C861 
N830Q862 
N330Q 863 
M330D864 
N8300865 
N8300866 
N8300 867 
N8300868 
M83Q0869 
N8300870 
M83G0 871 
N8300872 
N8300873 
N8300874 
N8300875 
N8300876 
N33Q0377 
N8300878 
N3300879 
N8300880 
N3300881 
N830G882 
N8300883 
N830B884 
N8300885 
N83Q0866 
N830D887 
N830fl888 
N830Q889 
N830089B 
N8300391 


0893 

0894 

0895 

0896 

0897 

0898 

0899 
090 0 

0901 

0902 
090 3 

0904 

0905 

0906 


» 


COMtMON SUBROUTINE TO STORE ONE CHARACTER 


OF 


INPUT 


PO 

27A 

0 0 0 0 

I0S2 

ADC 

PO 

278 

El OF 


LDQ- 

PO 

27C 

CIOD 


LDA- 

PO 

27D 

A023 


AND- 

PO 

27E 

0111 


SAN 

PO 

27F 

0FA8 


QLS 


V13,I 
V14, I 
V15,I 

0 

V15, 1 
V13,I 
ONEBIT^-0 
I OS 2 B 
8 


CHARACTERS f OF THIS PARAMO ALREADY 
current storage WORD AOOR. INITIA 
CHARACTER TO 8E STORED 

CHARACTER TO 8E STORED 
CHECK FOR STORING CHAR IN B 

SKIP FOR SAVING IN BO-7 
SET UP TO SAVE CHAR IN B8-1 


A PARAMETER 
SAVED 

LLY EQ' lOVlO ADR 

8-15, OR 0t7 
5 


N338 

0 

893 

N83B 

0894 

N830 

0 

895 

N830 

0 

896 

N83 0 

0 

397 

N330 

0 

898 

N83Q 

0 

899 

N83G 

0 

900 

N330 

0 

901 

N330 

0 

90 2 

N33B 

0 

903 

M83Q 

0 

9B4 

N33Q 

0 

90 5 

N330 

0 

90 5 


G907 

090 8 
C9G9 

0910 

0911 

0912 

0913 

0914 

0915 

091 6 

0917 

0918 

0919 

0920 

0921 

0922 

0923 

0924 


0926 
092 7 

0928 

0929 

0930 

0931 
0 93 2 

0933 

0934 

0935 

0936 

0937 

0938 

0939 

0940 

0941 

0942 

0943 

0944 

0945 
094 6 

0947 

0948 

0949 

0950 

0951 

0952 

0953 

0954 

0955 

0956 
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PO 280 

0814 

I0S2B 

TRQ A 

CURRENT STORAGE ADDRESS 

PO 281 

El QE 


LDQ- V14,I 

P0282 

8622 


ADD- (Z£RO),Q 


P0283 

6622 


SIA- {ZERO),Q 

BUMP COUNT OF CHARS STORED 

P02B4 

01 OD 


RAO- yi3,i 

P0285 

CIOD 


LDA- V13,I 


PD286 

09FD 


INA -2 


P0287 

0112 


SAN IOS26 





BUMP WORD STORAGE 

ADDRESS IF 2 CHARS ALREADY SAVED 

P0288 

OlOE 


RAO- V14,l 


P02B9 

1804 


JHP» IOS261 

FIFTH CHARACTER CHECK 

P028A 

09FD 

I0S26 

INA -2 

PG28B 

0111 


SAN 103261 


P028C 

DIGE 


RAO- V14,I 

EXIT 

P028D 

ICEC 

I0S261 

9 

JMP^ (I0S2) 


M83009Q7 
N83GQ 908 
N8300909 
N8300910 
N8300911 
N8300912 
N8300913 
N8300914 
N8300915 
N830Q916 
N83e0917 
N83G0918 
Na30Q919 
N8300920 
N8300921 
N830fl922 
N8300923 
N8300924 


* 

■» 

■* 

# 

»■ 

• 9 - 

9 


COMMON SUBROUTINE TO COLLECT 1-5 CHARACTERS OF A REQUEST 
PARAMETER. 


INPUT 


(Q) = BASE ADDRESS OF REQUEST BUFFER 

V44 =CHARACTER INDEX IN REQUEST BUFFER 


OUTPUT 


THE 

ARE 


V12 

V44 


CHARACTERS WILL BE SAVED IN lOVlD AND lOVll.THE CHARS 
IN ASCII MODE 

VIO = THE FIRST AND SECOND CHARS 

Vll = THE THIRD AND FOURTH CHARS 

=FIFTH CHARACTER AND ZERO 
=CHARACTER INDEX TO NEXT PARAMETER 
V13 = THE NUMBER OF CHARS IN THIS PARAMETER 

V15=GHARACTER TO BE STORED 


P028E 

00 

00 

I0S3 

ADC 

0 





INIflALI 

PB28F 

0 8 

44 


CLR 

A 

P0290 

61 

OA 


STA- 

VIO 

P0 291 

61 

OB 


STA- 

Vll 

P0292 

61 

oc 


STA- 

V12 

P0293 

61 

OD 


STA- 

V13 

P0294 

61 

10 


STA- 

V16 

P0 295 

OA 

DA 


ENA 

10 

P0296 

80 

FF 


ADD- 

$FF 


THE ROUTINE FOR A NEW PARAMETER 


CHARACTER STORAGE 

WORDS 

NO OF CHARS IN THIS PARAMETER 
TEMP CHAR STORAGE 
ADDRESS FOR CHAR STORAGE 


N830 0926 
N8300927 
N830Q928 
N8300929 
N830S93G 
N8300931 
N830Q932 
N8300933 
N8300934 
N839S935 
N3300936 
N8300937 
N83G0936 
N830 0 939 
N8300940 
N8300941 
N830D942 
N8303943 
N8300944 
N830 0945 
N8308946 
N8300947 
N83Q8 9^8 
N8300949 
N83G895Q 
N8300951 
N83QG952 
N83GB953 
N83Q0954 
N83Q0955 
N33G0956 
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P0297 
P0293 
P0299 
P029A 
P029B 
PD29C 
P0 29B 
P029E 
P029F 

P02A0 
P0 2A1 
P02A2 
P0 2A3 
P02A4 
P02A5 

PQ2A6 

P02A7 

P02A8 

P02A9 

P02AA 

P02A8 


610E 
E136 
58B6 
AOOA 
610F 
Dill 
1813 
0903 
Q lOD 

ClOF 
D9DF 
SlOA 
0920 
BO OA 
0107 

Clio 

0137 

CIQD 

09FA 

0104 

58CE 


P02AC 18FB 


P02AD CIOD 
PQ2AE 0111 
P02AF 1340 


PC 280 ICBO 


I0S3A 


I0S3B 


I0S3C 

IOS30 

*■ 


I0S3E 


STA- 
ID Q- 

AND- 

STA- 

SAN 

JMP* 

INA 

SAZ 

LDA- 

INA 

SAZ 

INA 

EOR- 

SAZ 


yABUF ,I 
lOSl 

LPMASK»-8 

V15,I 

I0S3B 

I0S3E 

-$2C 

I0S3C 

V15,I 

-$20 

I033C 

$20 

LP«ASK»-8 

I0S3C 


SKIP IF NOT ZERO 
JUHP END OF REQUEST., 

CHECK FOR A COMMA 

SKIP IF A COMMA. END OF A PARAMETER 


END OF REQUEST DATA $FF 
YES. END OF THE REQUEST 


LDA- ¥16,1 


SAM I0S3D INVALID CHARACTER. NOT AN ALPHANUMERIC 

LDA- ¥13,1 CHECK IF 5 CHARS ALREADY STORED 

INA -5 

SAZ I0S3D REvJEGT-5 ALREADY SAVED. 

RTJ«^ IOS2 SAVE THE CHARACTER 

LOOP TILL EITHER A COMMA OR THE PARAMETER END DENOTED 
BY $FF IS- DETECTED. 


JHP» I0S3A 

COME HERE FOR A COMMA AFTER A PARAMETER 

LDA- ¥13,1 CHECK IF ANY VALID CHARACTER STORESD . 

S A N I OS 3 E 

JMP» I0S44 INVALID PARAMETER, REJECT 


EXIT WITH THE PARAMETERS IN lOV 1 0 , lOVll , A NO I0V12. , 
AND NO OF CHARS OF THIS PARAMETER IN I0V13. - 


JHP» {I0S31 


N830Q957 

N8300958 

N83D0959 

N8300960 

N8300961 

N830D962 

N830D963 

N8300964 

N8300965 

N83Q 0966 

N8300967 

N83Q0968 

N83Q 0969 

N8300970 

N83G0971 

N83Q0972 

N830D973 

N8300974 

N3300975 

N830 Q976 

N33G0977 

N8300978 

N8300979 

N83Q0980 

N8300981 

N8300982 

N83D0983 

N830Q984 

N83QQ985 

N83G0986 

N830Q987 

N8300988 

N830Q989 

N830Q990 

N83G0991 

N83fl0992 

N83DD993 

N83S0994 

N8300995 

N830 0996 


0998 



0999 


COMMON S/ 

1000 

% 

TO AN EQU 

IQO 1 



100 2 


... INPUT 

100 3 


¥10 

100 4 


¥11 

100 5 


¥12 

100 6 


¥13 


FIRST TWO CHARS 

=3RD- AND 4TH CHARS 

=5TH CHAR {B8-151 

GIVEN NUMBER OF ASCII CHARS 


N83G0998 

N8300999 

N83810a0 

N8301Q01 

N83010Q2 

N8301083 

N8391004 

N8301005 

N3301D06 
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1007 



1008 



1009 



1010 



1011 



1012 



1013 

P02B1 

OOQO 

1014 

P02B2 

0 8 44 

1015 

P02B3 

6112 

1016 

P02B4 

6120 

1017 

P02B5 

0901 

1018 

P02B6 

6114 

1019 

P02B7 

ClOA 

1020 

P02B8 

0FC8 

1021 

P02B9 

•AOOA 

1022 

P02BA 

6113 

1023 



102 4 



1025 



1026 

P02B8 

CICD 

1027 

P02BC 

0 9FE 

1028 

P0 2BD 

0101 

1029 

P0 2BE 

1830 

1030 



1031 



1032 



1033 



1034 

P02BF 

El 01 

1035 

P02C0 

ODFG 

10 3 6 

P02C1 

0177 

1037 



1038 

PQ2C2 

C109 

1039 

PQ2C3 

ADOA 

1040 

P02C4 

0 9BD 

1041 

P0 2C5 

0101 

1042 

P02C6 

1816 

10 43 



1044 

P02C7 

01 41 

1045 

P02C8 

1814 

1046 



1047 

PQ2C9 

C113 

1048 

PO 2CA 

0 9B£ 

1049 

P02CB 

0121 

1050 

P0 2CC 

18 2F 

1051 



1052 

P02CD 

C113 

1053 

P02CE 

09B6 

105 4 

P02CF 

0105 

1055 



105 6 

P02DO 

09FC 

10 57 

P02D1 

0105 

1058 



1059 

P02D2 

09FB 




N8301007 

^ OUTPUT 


N8301fl08 

» V18 = 

BINART VALUE 

N3301009 



N3301010 

* INITIALIZE 


N8301Q11 

■» 


N830 1012 

I0S4 ADC 0 


N3301013 

CLR A 


N83G1014 

STA- \718,I 

TEMPORARY STORAGE FOR BINARY VALUE 

N8301Q15 

STA- V18Q,I 


N8301016 

INA 1 


N8301017 

STA- \/20,I 

NO OF CHARS PROCESSED 

N330 1018 

LDA- yiOtl 


N3301019 

ALS 8 


N8301020 

AND- LPMASKS-a 


N83fll021 

STA- ¥19,1 


N8301022 



N8301023 

^ CHECK WHETHER 

PARAM OF 1 OR MORE CHARACTERS 

N8301024 



N3301025 

■LDA- ¥13,1 


N83Q1026 

INA -1 


N8301027 

SAZ I0341N 

SKIP IF 1 CHARACTER 

N3301026 

JMP^ IOS46 


N8301029 



N8301030 



N8301031 

^ CHECK PARAMETER NUMBER 1 OR 2 

N8301032 



N8301033 

I0S41 N LDQ- ¥01,1 


N8301034 

INQ -3 


N8301035 

SQH I OS 41 8 

1ST OR 2N0 PARAMETER, SKIP 

N8301036 



N8381037 

LDA- ¥09,1 

CHECK FOR M8 OR PB REQUEST . 

N8301038 

AND- LPMASKit-8 


N8301039 

INA -$42 


N830194G 

SAZ I0S41A 

FOR M8/PB SKIP 

N8301Q41 

JMP» IOS41W 


N8301G42 

jf 


N8301043 

IOS41A SQZ I0S41B 

FOR PR/MB SKIP IF 3RD PARAMETER 

N83aiQ44 

JMP» I0541W 


N8301045 



N8301O46 

IOS41B LDA- ¥19,1 

CHECK SINGLE CHAR IS ALPHA OR NUMERIC , 

N830 1047 

INA -$41 


N8301048 

SAP I0S41C 

IF ALPHA SKIP 

N83G1049 

• UHP» I0S46 

FOR NUMERIC JUMP TO CONVERT TO -BINARY 

N8301050 



N83C1051 

I0S41 C LDA- ¥19,1 

CHECK CHARACTER TO 8£ Il$49) 

: N8301052 

INA -$49 


N8301 053 

SAZ IOS41I 

SKIP IF I 

N8301054 



, N3301 055 

INA -3 

CHECK CHARACTER TO BE Lt$4C> 

N8301056 

SAZ IOS41L 

SKIP IF L 

N83Q1057 



N8301058 

INA -4 

CHECK CHARACTER TO BE P{$5Q) 

N8301059 
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1060 

P02D3 

0105 

1061 



1062 

P02D4 

131B 

1063 



1064 

Pfl205 

C0F9 

1065 

P02D6 

1804 

1066 



1067 

P02D7 

COFB 

1068 

P02D8 

1802 

1069 



107 0 

PQ2D9 

CO FA 

1071 



1072 

P02OA 

6112 

1073 



1074 

PO 2D8 

1CD5 

1075 



1076 

P0 2OC 

ElDl 

1077 

PQ2DD 

C223 

1078 

P02DE 

0FC5 

1079 

P02DF 

E129 

1080 

P02E0 

AA 00 


P02E1 

FD77 

1081 

PD2E2 

0111 

1082 

P02E3 

1818 

1083 



108 4 



108 5 



1086 

P0 2E4 

0109 

1087 

P02E5 

0FC8 

1088 

P0 2E6 

A OOA 

1089 

P02E7 

BO 00 


P02E8 

0 0 50 

1090 

P02E9 

0107 

1091 

P02EA 

C113 

1092 

P0 2EB 

09B9 

1093 

P0 2EC 

OlOA 

1094 

P02EO 

09F3 

1095 

P0 2EE 

0108 

1096 



1097 

PO 2EF 

18GD 


P02FC 

FE07 

1098 



1099 



1100 



llGl 

P02F1 

C113 

1102 

PO 2F2 

09 BE 

1103 

PO 2F3 

0103 

1104 

PQ2F4 

D9FE 

1105 

P02F5 

0101 

1106 

P02F6 

18F8 


1108 

1109 


I0S41I 

* 

IDS 41 L 

I0S41P 

I0S41S 

» 

it- 

I0S41W 


SAZ I0S41P 

JMP’^ I0S44 

LDA- $F9 
JMP^ I0S41S 

LDA- ?FB 
JMP» I0541S 

LDA- $FA 

STA- V18,I 

JHP^ (IOS45 

LOQ- \/01,I 
LOA- ONEBIT,Q 
ALS 5 
LDD- ^08tl 
AND rOT02»Q 

SAN I0S43 
JHP^ 10346 


SKIP IF P 

FOR OTHER THAN I,P,1 REJECT 
GET STANDARD INPUT LU 

GET STANDARD LIST LU 

GET THE STANDARD OUTPUT LU 

SA\/E THE SPECIFIED LU AS THE PARAMETER, 

AND EXIT FROM THE ROUTINE 

GET THE ONE BIT MASK CORRESPONDING 
TO THE PARAMETER NUMBER 

INDEX TO CURRENT REQUEST 


SKIP IF ALPHA CHAR REGD 
OTHERWISE JUMP FOR BIN CONVERSSION 


at 

■ CHECK CHAR TO BE 

R/F FOR MAG TAPE 

OR A. 

■sr 

IOS43 

. LDA- 

VD9,I 

REQUEST CODE 

BE A 

ALS 
^ AND- 
EOR 

8 

LPHASK«-8 
= N$50 

CHECK INPUT TO 


SAZ 

LDA- 

INA 

SAZ 

INA 

I0S44A 
V 19 } I 
-$4b 
I OS 45 
-12 

SKIP FOR PAPER 
F 

SKIP IF F 
R 

TAPE 

•* 

I0S44 

SAZ 

I0S45 

SKIP IF R 


J'HP 

10210 

FORMAT ERROR REJECT 


♦ 

»• 

I0S44A 


■* 


CHECK A/B FOR PAPER TAPE INPUT 

LDA- 1/19,1 
INA -$41 


SAZ 

INA 

SAZ 


I OS 45 

-1 

IOS45 


SKIP IF A 

JMP* I0S44 
SAVE THE R/F PARAMETER PLUS BIT 15=1 


SKIP IF B 

REJECT FOR OTHER CHARACTERS 


NB301Q6Q 
N8301061 
N8301062 
N3301063 
N8301064 
N83D1Q65 
N8301066 
N8301067 
M3301068 
N83Q1069 
N8301070 
N3301Q71 
N8301072 
N3301073 
N3301074 
N3301Q75 
N33Q1076 
N830 1077 
N83B1078 
N8301379 
N8301Q80 

N8301081 

N83Q1Q82 

N8301Q83 

N8301Q84 

N8301Q85 

N33Gia86 

N8301Q87 

N8301Q88 

N63Q1089 

N8301Q90 

N83Q1091 

N330iQ92 

N33G1Q93 

N8301Q94 

N8301095 

N83Q1096 

N83D1097 

N8301096 

N8301099 

N8301100 

N83011G1 

N8301102 

M83G1103 

N83D1104 

N8301105 

N8301106 

N8301107 

N83011G8 

N83G11Q9 
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1110 






1111 

PQ2F7 

C113 

I0S45 

LDA- V19,I 


1112 

P02F8 

B032 


EOR- ONEBIT+15 


1113 

P0 2F9 

6112 


STA- V16,I 


1114 

1115 

P02FA 

1CB6 


JHP-^ (I0S4) 

EXIT 

ill 6 




GOME HERE TO CONVERT THE 1-5 ASCII PARAMETER TO A 

1117 

1113 



% 

VALUE 


1119 






1120 

P02FB 

5820 

I0S46 

RTJ» I0S5 

'VALIDATE AND CONVERT TO BINARY 

1121 





1122 



V- 

THE BINAR7 RESULT IS IN REGISTER A 

1123 

1124 

P02FC 

8112 


ADD- V18,I 


1125 

1126 

P02FO 

6112 

'-if- 

STA- V18,I 


1127 




CHECK RANGE OF 

BINARY NUMBER 

1128 





1129 

PC2FE 

0123 


SAP I0S46A 

SKIP IF »LT. 32768 

113 0 

P02FF 

D12D 


RAO- V18Q,I 

UPDATE QUOTIENT 

1131 

P0 300 

AOll 


AND- LPMASK>H5 

1132 

1133 

P0301 

6112 


STA- V18,I 


1134 



Y- 

CHECK ALL CHARACTERS DONE 

113 5 






1136 

P0302 

CIOD 

I0S45A 

LDA- V13,I 

TOTAL NBR OF CHARS 

1137 

P03C3 

9114 


SUB- V20,I 

NO OF CHARS CHECKED SO FAR 

1138 

P0304 

0111 


SAN IOS48 

MORE CHARACTERS TO BE DONE 

•113 9 

P0305 

ICAB 

I0S47 

JMP^ fI0S4') 

1140 






1141 




MORE CHARS TO BE DONE 

1142 






1143 

PQ306 

C112 

I0S48 

LOA- V18tl 

'MULTIPLY BINARY NUMBER BY 10 

1144 

F030 7 

20 45 


MUI- S45 

1145 

P0308 

6112 


STA- Via, I 


1146 

1147 

P0309 

D114 


RAO- V20,I 

BUMP NO OF CHARS PROCESSED 

1148 



-«p- 

GET THE CORRECT 

CHARACTER FOR ANALYSIS 

1149 

1150 

PG30 A 

C114 


LDA- V20,I 


1151 

P030B 

09FC 


INA -3 


1152 

P030C 

0137 


SAM I0S4A 


1153 

P03 0T1 

0108 


SAZ I0S4S 

FOR CHAR 3 !B8-15 OF Vlll 

1154 

P0 30E 

09FD 


INA -2 

1155 

P030F 

0129 


SAP I OS 40 

SKIP IF 5TH CHAR{B6-15T 

1156 

P0310 

ClOB 


LDA- V11,I 

FOR CHAR 4 <B0-7 OF lOVll) 

1157 

P0311 

AOOA 

I0S49 

AND- LPMASK»-8 

1158 

PO 31 2 

6113 

STA- V19,I 


1159 

P0313 

18 E7 


JMP^ I0S46 


1150 

PC314 

ClOA 

I0S4A 

LDA- V10,I 

CHARACTER 2 

1161 

P0315 

18FB 


JM'P» I OS 49 


1162 

PQ316 

ClOB 

I0S43 

LDA- V11,I 

CHARACTER 3 


N33D111Q 

N33D1111 

N3301112 

N8301113 

N83aill4 

N83Q1115 

N8301116 

N83011ir 

N8301116 

N3301119 

N83G112D 

N8301121 

N83Q1122 

N8381123 

N83G1124 

N8301125 

N8301126 

N8301127 

N33flll28 

N8301129 

N83D1130 

N8301131 

N8301132 

N8301133 

N8301134 

N8301135 

N8301136 

N8301137 

N8301138 

N8301139 

N8301140 

N83G1141 

N330il-42 

N83Q1143 

N8301144 

N33Q1145 

N3301146 

N83D1147 

N83Oil40 

N831ill49 

N330115G 

N83G1151 

N8301152 

H8301153 

N83D1154 

N8301155 

N8301156 

N830il57 

M8301158 

N8301159 

N8301160 

N83011&1 

N8301162 


I0UPV4 
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DATE? 


08/19/99 


1163 

1164 

1165 

1166 
1167 


1169 

1170 

1171 

1172 
117 3 

1174 

1175 

1176 

1177 

1178 

1179 

1180 

1181 

1182 

1183 

1184 

1185 

1186 

1187 

1188 
1189 
119 0 
1191 
119 2 
119 3 
1194 


1196 

1197 

1198 

1199 
120 0 
120 1 
120 2 
1205 

1204 

1205 

1206 

1207 

1208 


PQ317 

P0318 

0 FC8 
18F8 

I0S4C 

ALS 

JMP» 

3 

10349 


N8301163 

N8301164 

N8301165 

P0319 

P031A 

CIQC 

18FC 

I0S4D 

LDA- 

JMP^ 

V12,I 

I0S4C 

FOR CHAR 5 

N8301166 

N8301167 






N8301i69 



If- 

COHHON SUBROUTINE TO CONVERT 1 ASCII CHARACTER CO-93 TO 

N83Q1170 




A BINART EQUIVALENT NUMBER 

N8301171 





N8301172 



'-9- 

INPUT 

N8301173 




ASCII CHAR IN BITS 0-7 OF V19,I 

N8301174 




OUTPUT 

N8301175 



9- 

BINARY VALUE IN A 

N8301176 





N8301177 

P031B 

00 0 0 

IOS5 

ADC 0 

N83D1178 

PQ31G 

C113 


LQA- V19»I 

N83Q1179 

P031D 

ADOfl 


AND =N$F0 . , . . 

N83Q118Q 

P031E 

OOFO 




P031F 

D9CF 


INA -$30 

N8301181 

P0320 

0113 


SAN I0S59 REJECT IF NOT 0-9 

N8301182 



9- 


. Na301183 



9- 

FOR A NUMERIC CHARACTER 

N8301184 



¥ 


N8301185 

P0321 

G113 


LDA- V19,I 

N8301166 

P0322 

A006 


AND- LPHASK+4 

N8301187 

P0323 

1CF7 


JMP» tI3S5) 

N8301186 





N3301189 



'9- 


N8301190 




REJECT 

N8301191 



'9- 


N83Q1192 

PQ324 

18CA 

IOS59 

JMP» I0S44 REJECT THE REQUEST 

N3301193 



9- 


N83G1194 




V- 


N3301196 



9 

COMMON SUBROUTINE IOS6 TO COLLECT A PARAHETFR AND VALIDATE IT 

N8301197 



9- 


N8301198 




INPUT 

N8301199 




OUTPUT 

N330 12Q0 




EQUIVALENT BINARY NUMBER IN V18 AND V18Q 

N3301201 




PARAMETER TABLE lOVOl. 

N83G 1202 



* 

lOVOl IS INCREMENTED BY 1. 

, N83G1203 





N33Q1204 

P0325 

0000 

I0S6 

ADC 0 „ 

N8301205 

P0326 

E136 


LOG- VABUF,I REQUEST DATA BUFFER 

N3301206 

P0327 

0101 


PAO- V01»I SET UP FOR PARAMETER .STORAGE. 

N83D1207 

P0328 

58 0 0 


RTJ IOS3 

N83Q12Q6 

P0329 

FF64 





o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 




lOUP 

V4 


PAGE 

1209 






121 D 






1211 




CONVERT THE 

1212 

1213 

P032A 

5800 


RTJ 

I0S4 


P032B 

FF85 



1214 

P032C 

El 01 


LDO- 

V01,I 

1215 

P032D 

C112 


LDA- 

vie.i 

IOV01,i 

1216 

P032E 

6A 00 


STA 


P032F 

FCD3 




1217 

P033C 

0D2B 


INQ 

43 

121 8 

PO 331 

C12D 


LDA- 

V18Q, I 

1219 

P0332 

6A0 0 


STA 

IOV01,I 


P0333 

FCCF 




1220 






1221 




,, UPDATE THE - 

1222 

1223 

P0334 

ICFO 


JMP^ 

( I0S6 ) 

1224 







DATE,: 08/19/99 


SAVE QUOTIENT 


1226 

122 7 
1228 

1229 

1230 

1231 

1232 

1233 

1234 

123 5 
1236 
123 7 


5 ? 


1238 

P033 5 

0000 

I0S7 

AOC 

0 


1239 

P0336 

6100 


STA- 

V12tl 


1240 

P0 33 7 

4113 


STQ- 

V19»I 


1241 

P0338 

GAOO 


LOA 

IOV01,Q 



P0339 

FCC9 





1242 

P033A 

0822 


TRA 

Q 


1243 







1244 



jf. 

CHECK IT TO 

BE 

1245 







1246 

P033B 

9C00 


SUB 

(ALOGIA 

) 


PO 33C 

G076 





1247 

P033D 

0102 


SAZ 

I0S71 


1248 

P033E 

0131 


SAM 

losri 


1249 

P033F 

1833 


JHP* 

I0S78 


1250 

P0340 

EE72 

I0S71 

LDQ» 

(ALOGIA 

)tQ 

1251 

PD341 

C208 


LDA~ 

8 » Q 

1252 

P0342 

0F4B 


ARS 

11 


1253 

PD343 

A005 


AND- 

LPMASK^ 

3 


COMMON SUBROUTINE I0S7 TO VALIDATE A GIVEN PARAMETER AS A 
VALID INPUT/OUTRUT LU NUMBER AS PER THE REQUEST CODE 

INPUT 

Q = 1 CHECK UNIT TO BE AS IN INPUT UNIT 

Q = 2 CHECK UNIT TO BE AS AN OUTPUT UNIT 

Q=3 CHECK UNIT TO BE- A VALID PRINTER UNIT 

V09= CURRENT 2 CHARACTER REQUEST CODE 

IF OUTPUT CHARACTER IN REQUEST CODE IS B AND Q=2 
THEN VALIDATE NUMBER AS A CARD PUNCH UNIT 


SAVE INPUT PARAMETER IDENTIFIER 


LEGAL LU - LOGIA 


MAX LEGAL NUMBER 

LU,HAX OK 
LU.LT.MAX OK 
INVALID LU REJECT 
PHYSICAL DEVICE TABLE 
EREQST WORD 8 OF THE FHY 
GET THE EQUIPMENT CLASS. 


DEVICE TABLE 


N3301209 

N8301210 

N8301211 

N8301212 

N8301213 

N830121 4 
N8301215 
N830121 6 

N8301217 

N8301218 

N8301219 

N83Q122Q 

N83G1221 

N8301222 

N8301223 

N8301224 


N8301226 
N83Q1227 
N8301228 
N83Q1229 
N8301230 
N8301231 
N8301232 
N8301233 
N83D1234 
N83Q1235 
N8301236 
N830123 7 
N3301233 
N83012S9 
N330124D 
N3301241 

N8301242 

N8301243 

N8301244 

N3301245 

N83G1246 


N830 

N830 


N830 

N830 

N830 

N830 


1247 

1248 
N8301249 

1 250 

1251 

1252 

1253 


o 

o 

o 

o 

o 

■ o 
o 
o 

■ o 

: o 
o 
o 
; o 
o 

: O 

o 


o 


O 
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DATEJ 06/19/99 


{ } 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


1254 

P0344 

1255 

P0345 

1256 


125 7 


1253 


1259 

P0346 

126 0 

P0347 

1261 

P0348 

1262 

P0349 

1253 


1264 


1265 


1266 

P034A 

1267 

P034B 

1258 

P034C 

1269 


1270 


1271 


1272 


1273 

P034O 

1274 

P034E 

1275 

P034F 

127 6 


127 7 


1278 


1279 

P0350 

1280 

P0351 

1281 


128 2 


12 83 


1284 

P0352 

1285 

P0353 

1286 

P0354 

128 7 

P0355 

1288 


128 9 


1290 


1 291 

P0356 

1292 

P0357 

1293 

PQ356 

1294 


1295 

P 0359 

1296 


1297 


1298 


1299 


1300 

P035A 

1301 


1302 


1303 


1304 

PO 35B 

1305 

PC35C 

1306 



A009 

6114 


C129 

D9EB 

0131 

1828 


C128 
Dili 
18 0 A 


C113 
0 9FE 
0102 


C109 

1803 


Cl 09 
0FC8 
AOOA 
180F 


C115 

09FD 

0121 

18F6 


0102 

0 A4C 
1608 




»■ 


AND- LPMASK9-7 

STA- V20tl SAVE THE EQUIPMENT CLASS. 

CHECK A TAPE MOYION REQUEST 

REQUEST INDEX 


LDA- VOStI 
INA -20 
SAM I0571A 
JMP» I0S79 

CHECK A VXX REQYEST 


NOT A MOYION CONTROL REQUEST 
EXIT FOR A MOTION CONTROL REQUEST 


I0S71ALDA- V40,I 
SAN I0S71B 
JM'P» I OS 72 


SKIP IF A VXX REQUEST 
NOT A VXX REQUEST 


I0S718 


'#• 

I0S71C 

* 

I0S710 

I0S71E 

* 

Of- 


CHECK UNIT 1 OR, 2 

LDA- V19,I 
INA -1 

SAZ I0S71D SKIP IF UNIT 1 

GET THE SECOND CHARACTET 

LDA- V09,I 
JMP» I0S71E 

CHOSE THE FIRST CHARACTER OF THE REQUEST 

LDA- V09,I 
AL S 8 

AND- LPMASK4-8 
UMP» I0S74 

FOR A NON VXX RFQUFST 


I0S7? 


I0S72 A 

Tf- 




LDA- ¥19, 1 

INA -2 

SAP IOS72A 

SET FOR THE INPUT 

JMP’^ I0S71D 


CHECK FOR OUTPUT 
TYPE SEARCH 
GET FIRST CHARACTER 


CHECK UP UNIT 2 OR 3 


SAZ 

I0S73 

SKIP IF UNIT 2 

THE 

3RD UNIT MUST 

BE A PRINTER 

ENA 

$4C 

CHARACTER L 

JMP» 

IOS74 



N8301254 

N3301255 

N83Q1256 

N3301257 

N8301258 

N8301259 

N83012&0 

N8301261 

N8301262 

N8301263 

N8301264 

N8301265 

N8301266 

N8301267 

N83Q1268 

Na301269 

N8301 270 

N3301271 

N3301272 

N83D1273 

N83Q1274 

N8301275 

N8301276 

N8301277 

N83D1278 

N33D1279 

N8301 280 

N83Q1281 

N83Q1282 

N33D1283 

N8301284 

N8301285 

N8301286 

NS301287 

M8501266 

N8501289 

N8301290 

N8301291 

N83G1292 

N83G1293 

N8301294 

N83C1 295 

N8301296 

N8301297 

N3301298 

N3301299 

N830130C 

N63G1301 

N8301302 

N8301303 

N8301304 

N8301305 

N83G1306 


G 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 
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130 7 



#■ 

CHECK IF CHA PACYER 

B 

N83D13Cr 

130 8 







N33013D8 

1309 

P035D 

C109 

I0S73 

LDA- 

V09^ I 


N3301309 

1310 

P035E 

AD OA 


AND- 

LPHASK*-8 


N8301310 

1311 

P035F 

09BD 


INA 

-$42 


N3301311 

1312 

P0 360 

0112 


SAN 

I0S73A 

NOT A B. CHECK AS PER SECOND CHARACTER . 

N83D1312 

1313 



» 




■■ N8301313 

1314 

P0 361 

C A43 


ENA 

$43 

UNIT 2 FOR B MUST BE A CARD PUNCH UNIT 

N8301314 

1315 

P0362 

1802 


JMP^ 

I0S74 


N3301315 

1316 



if 




N3301316 

131 7 

PQ 363 

18 EC 

I OS 73 A 

JMP» 

I0S71C 

GET THE SECOND CHARACTER 

N83Q1317 

1318 

P0364 

E114 

IOS74 

LDO- 

V2Q,I 


N8301318 

1319 

P0365 

D9BC 


INA 

-$43 

IS CARD SPECIFIED 

N3301319 

1320 

P0366 

0108 


SAZ 

IOS74C 

YES 

N8301320 

1321 

P0367 

09F5 


INA 

$43-$40 

NO, IS NAG TAPE SPECIFIED 

N8301321 

1322 

P0368 

0 107 


SAZ 

I0S74M 

YES 

N83D1322 

1323 

PQ369 

0 9FC 


INA 

$4D-$50 

NO, IS PAPER TAPE SPECIFIED 

N83Q1323 

1324 

P036A 

0103 


SAZ 

I0S74P 

YES 

N8301324 

1325 

P036S 

0904 


INA 

$50-$4C 

NO, IS LINE PRINTER SPEC. 

N8301325 

1326 

P036C 

0115 


SAN 

I0S76 


N83G1326 

1327 

P036D 

ODFE 

IOS74L 

INQ 

-1 


M3301327 

1328 

P036E 

OOFE 

IOS74P 

INQ 

-1 


N8301328 

1329 

P036F 

OOFD 

I0S74C 

INQ 

-2 


N83Q1329 

133G 

P0370 

OOFE 

IOS74M 

INQ 

-1 


NS301330 

1331 

P0371 

0142 


SQZ 

I0S79 

CLASS OK 

N33D1331 

1332 






M8301332 

1333 

P0372 

1800 

I0S78 

JMP 

10210 

REJECT 

N8301333 


P0373 

F084 






1334 







N8301334 

1335 

P0374 

IGCO 

I0S79 

JMP-* 

TI0S7I 


N8301335 

1336 



* 




N83D1336 


1338 

1339 

1340 

1341 

1342 

1343 

1344 

1345 

1346 
134 7 

1348 

1349 

1350 

1351 


COMMON SUBROUTINE 
» WALIO REPEAT 


P0375 

0 000 

IOS8 

ADC 

0 

P0376 

CAOO 


LDA 

I0VG1,Q 

P0377 

FC88 

1!A 


P0378 

Q132 


SAM 

I0S35 

P0 379 

0101 


SAZ 

I0S85 

PD37A 

ICFA 


JMP» 

( I0S8 ) 

P037B 

18F6 

I0S85 

JMP* 

IOS78 




» 


IGS8 TO VALIDATE A PARAMETER AS A 
COUNT 


INOEX TO THE PARAMETER IN IOV05 TABLE 


INVALID ALPHA R/F 
INVALID ZERO 
VALID EXIT 

INVALID REJECT 


N8301338 

N8301339 

N8301341 

N8301342 

N83D1343 

N8301344 

N8301345 

N8301346 

113 * 4245 *»^»»**» 

N8301349 

N630135D 

113-^42 45 

N8301352 


1 CARO DELETED 


o 








1 

( 
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DATE: 08/19/99 



o 

1353 



- 7 - 



N8301354 

o 


1354 




COMMON SUBROUTINE 

TO IDENTIFY A GIVEN PARAMETER 

N8301355 



1355 




AS AN ALPHA CHARACTER 

N8301356 


o 

1356 






N8301357 

o 

1357 

P037C 

0000 

I0S9 

ADC 0 


NB301356 


1358 

P037D 

CAOO 


LDA I0\/01,Q 


N3301359 




P037E 

FC84 






o 

135q 

P037F 

0131 


SAM I0S99 

VALID R/F CHAR 

N8301360 

o 

135 0 

P0380 

18F1 


JMP* IOS7Q 

INVALID CHARACTER REJECT 

N8301361 


1361 

P0381 

IGFA 

I0S99 

JMP’f (I0S9) 


N8301362 



1362 



% 



N8301363 


o 








o 

o 

1364 






N83Q1365 

o 

1365 




COMMON SUBROUTINE 

TO VALIDATE A PARAMETER AS A VALID 1-99999 

N8301366 


1366 



at 

THE 1-99999 IS IN 

TWO WORDS OF THE PARAMETER LIST 

N8301367 



1367 




THE TWO WORDS ARE 

AS FOLLOWS 

N8301S68 


o 

1368 




TOTAL NBR OF RECS 

DIVIDED NY 32768 

N8301369 

o 

1369 




ONE WORD HAS THE 

QUOTIENTTO-3) AND REMAINDER (0-16985 

N830 1,37 0 


1370 





N83Q1371 



1371 




IF THE INPUT DATA 

IS WRITTEN TO SCRATCH V43.EQ-ZER0 

N83Q1372 


o 

1372 




CHECK THE GIVEN NUMBER OF RECORDS DO NOT EXCEED THE AVLE SCRATCH 

N6301373 

o 

1373 






N8301374 


1374 

P0382 

0000 

lOSlO 

ADC 0 


N83Q1375 



1375 

P0 3 63 

4811 


STQ» lOSlOV 

SAVE PARAMETER LOCATION 

N8301376 


o 

1376 

P0384 

ni2B 


LDA- V43,I 

CHECK DATA TO BE WRITTEN TO SCRATCH 

N8301377 


1377 

P0385 

01 ID 


SAN IOS106 

SKIP IF NOT TOBE WRITTEN 

N8301378 



137 8 




N8301379 



1379 

P0386 

0O2B 


INQ 43 

GET THE QUOTIENT 

N8301 380 


o 

1380 

P0387 

EABO 


LDQ IOV01,Q 


N83Q1381 

O 

P03aa 

FC7A 




N8301382 


1381 

P0389 

C12A 


LDA- V42,I 

AVLE SCRAYGH 



1382 

P036A 

0144 

IOS102 

SQZ IOS104 

SKIP IF QUOTIENT ZERO 

M8301383 


o 

138 3 




N8301384 

■ O 

1384 

P038B 

0 9F€ 


INA -1 


N83Q1365 


1385 

P038C 

90 11 


SUB- LPHASK9-15 

SKIP IF AVLE SCTATCH .GT. 32768 

N8301386 



1386 

P0 38O 

0137 


SAM I OS 107 

REJECT IF LESS 

N83Q1387 


o 

138 7 

at 



N83O1380 

o 

1388 

P038E 

13 F 8 


JMP» IOS10 2 


N83D1389 


1389 






N83O1390 



1390 




COME. HERE WITH QUOTIENT ZERO 

N8301391 


o 

1391 




COMPARE THE AVLE 

SCRATCH 1 IN Al AND THE PARAMETER VALUE 

N8301392 

o 

1392 






N83G1393 


1393 

P038F 

E'8 05 

lOSlO 4 

LDQ^ lOSlOV 


N8301 394 



1394 

P039D 

9A0 0 


SUB lOVOltQ 


N83 0139 5 


o 

1395 

P0391 

P0392 

FC71 

0132 


SAM IOS107 

REJECT IF SXRATCH. LT. GINEN NBR 

N8301396 

• o 


1396 

P0393 

ICEE 

IOS106 

JMP^ (lOSlOa 

EXIT 

N8301397 



1397 





N8301398 


o 

1398 

1399 

P0394 

0 0 00 

lOSlO V 

It 

NUH 0 

TEMP STORAGE 

N8301399 

N83G1400 

o 

o 








o 

o 








o 
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li-Q 0 
lAOi 
lAO 2 

140 4 

1405 

1406 

1407 

1408 

1409 

1410 


1411 

1412 

1413 
141i^ 


1416 

1417 

1418 

1419 
142Q 

1421 

1422 
1 <42 3 

1424 

1425 

1426 

1427 

1428 

1429 

1430 


» SET UP FOR REJECT MESSAGE AND PRINT AVLE AREA 


P0395 

0 AFE 

IOS107 ENA 

-1 

P0396 

E815 

LDQ» 

RTJ 

lOMSD'L 

P0397 

5800 

IOS40 

P0398 

0658 



P0399 

P039A 

1800 

F027 

JMP 

1 01 30 


EXIT TO GET NEXT lOUP REQU«-SO 





IOMS13 REQUEST 

REJECTED 





EXCEED 

the AVLE 

P0 39B 

5245 

I0MS13 

ALF 

15,REJ EXCEEDED MA 

P039C 

4A20 





P039D 

45 58 





P039E 

43 45 





P039F 

4544 





P03A0 

4544 





P0 3A1 

2 0 40 





P03A2 

4158 





P03A3 

2 0 4C 





PD3A4 

494D 





PD3A5 

4954 





P03A6 

2020 





P03A7 

20 4E 





P03A8 

4E4E 





PD3A9 

4E4‘E 





P03AA 

200D 


NUM 

$20 00 


P03AB 

039B 

P IQHSDL 

ADC 

IOMS13 



BECAUSE 

SCRATCH 

X LIMIT 


DATA SPECIFIED IN REQUEST 
AREA 

NNNNN 


N83 0 1 401 
N83D1402 
N8301403 
N83Q1404 

N83Q140 5 
N830 1h06 

N83G 1407 
N8301408 
N83G 1409 
N8301410 
N8501411 


N8301412 

N8301413 

N83Q1414 

N8301415 


% 


COMMON SUBROUTINE TO GET THE PHYSICAL DEAJICE TABLE ADDRESS 


NUMBER 

DEVICE TABLE ADDRESS 


P03AG 

0 0 0 0 

IOS12 

INPUT 

ADC 

10,1= INDEX TO 
0 

T HE 

P03AD 

EAOO 


LOQ 

IOV01,Q 

GET 

P03AE 

P03AF 

FC54 
EE 03 


L'DQ’^ 

lALOGlAl ,Q 

GET 

P03B0 

4116 

Xjf. 

STQ- 

\722, 1 


PD3B1 

ICFA 

Jf. 

JMP» 

tI0S12J 


P03B2 

7FFF 

X ALOGIA 

ADC 

LOGIA 



N830 1417 
N8301418 
N8331419 
N83G142 0 
N3301421 
N8301422 
N83D1 423 
N8301424 

N8301425 

N83S1426 

N8381427 

N8301428 

N83B1429 

N8301430 

N8301431 
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DATES 08/19/99 


o 


o 


o 


1432 

1433 

1434 

1435 

1436 

1437 

1438 

1439 
1448 

1441 

1442 

1443 

1444 

1445 

1446 


P0383 DDQO 


V- 

V- 

lOSA 

* 

* 


COWMOM SUBROUTINE 
ADC 0 


TO CHECK FILE RECORD XFER 


P03B4 

P03B5 

P03B6 

P03B7 

P03B3 

PQ3B9 


C129 

09F6 

0C03 

0132 

09F9 

0131 


P03BA 180B 


CHECK WHETHER R/F IS APPLICABLE TO CURRENT REQUEST 
LDA- VOS, I 
INA -9 
ENQ 3 
SAM IOSA02 
•INA -6 
SAM IOSA03 

R/F IS NOT API 
IOSA02 JHP* IOSA05 

FOR R/F APPLICABLE 


SKIP NOT APPLICABLE 

APPLICABLE 

■PLICABLE 



1447 

P03BB 

C129 

IOSA03 LDA- 

V08,I 


1448 

P03BC 

0 9F4 

INA 

-11 


1449 

P03BO 

0111 

SAN 

lOSAOl 

o 

1450 



fi- 


1451 

P03BE 

QD 01 

lm 

1 


1452 



'* 



1453 

P03BF 

CAOO 

lOSAOl LDA 

lOVOl ,Q 



P0 3CO 

FC42 



••J 

1454 

P03C1 

AOOA 

- AND- 

LPMASKst-8 


1455 

P0 3C2 

ODOl 

INQ 

1 


1455 

P03C3 

0 9B9 

INA 

-$46 

o 

1457 

P0 3C4 

0101 

SAZ 

IOSA04 

1458 



'4 



1459 

P03C5 

D8FD 

IOSAD5 RA0'«^ 

lOSA 


1460 



«■ 


o 

1461 



=>■ EXIT 


1462 






1463 

P0 3C6 

ICEC 

IOSA04 JMP» 

(lOSA ) 


1464 



4 


o 






o 

1466 



4 


146 7 



^ COMMON S/R TO 


1463 

1469 

Pfl3C? 

0000 

'* 

lOSP ADC 

o’ 

o 

1470 

P0 3C8 

D125 

RAO- 

V37,I 

1471 




V43,I 


147 2 

P03C9 

C12B 

LDA- 


1473 

P03CA 

0105 

SA7 

loseos 

o 

147 4 
1475 

P03GB 

C125 

n- 

LDA- 

V37,I 


1476 

P03CC 

0123 

SAP 

IOSB05 


1477 




W37Q,I 

o 

1478 

1479 

P03CQ 

0134 

RAO- 


REQYESTS 
REQUEST INDEX 

FOR MB R/F IS THE 4TH PARAMETER 
NOT MB 


UPDATE Q TO NUMBER 

SKIP IF FILES BEING TRANSFERREO 

UPDATE RETURN 


SKIP IF SCRATCH IS USED 

SKIP IF .LT. 32768 
BUMP QUOTIENT 


N8301433 
N8301434 
N8301435 
N8301436 
N83Q1437 
N8301438 
N8301439 
N8301440 
N3301441 
N8301442 
N8301443 
N8301444 
N83D1445 
N8301 446 
N8301447 
N8301448 
N8301449 
N8301450 
N8301451 
N83fll452 
N8301453 
N830145 4 

N8301455 

N8301456 

N8301457 

N8301458 

N8301459 

N83G1460 

N8301461 

N8301462 

N8301463 

N8301464 

N83014b5 


N3301467 
N3301468 
N33Q1h69 
N3301470 
N6301471 
N8301472 
N83Q1473 
N3301 474 
N8301475 
N3301476 
N3301477 
N8301478 
N8301 479 
N8301480 



O 

o 

o 

o 

o 


o 


o 

o 

o 

o 

o 

o 

o 


o 


o 


o 


o 


o 
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DATE: 08/19/99 


o 

o 

o 

o 


1480 P03CE AO 11 AND- LPHASKH5 

1481 P03CF 6125 STA- V37,I 

1482 ♦ 

1483 P03D0 1CF6 IOSB05 JMP^ (lOSB) 

1484 ^ 


O 

o 

o 

o 


o 

o 


o 


o 

o 

o 

o 

o 


N8301481 

N8301482 

N8301483 

N8301484 

N8301485 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATEi 08/19/99 


1486 

1487 
1468 
1489 
1^90 
1491 
149E 


1493 

P03D1 

QCQO 

lOA 

END 

0 


1494 





lOAT, 

Q 

1495 

P03O2 

CA21 

IOA05^ 

LDA» 

1496 

P03D3 

0139 


SAM 

IOA15 


1497 

P03D4 

9129 


SUB- 

W08,I 


1498 

P03D5 

0102 


SAZ 

lOAlO 


1499 

1500 

P03D6 

■0D02 

. ^ 

■INQ 

2 


1501 

1502 

P03D7 

18FA 


JMP» 

IOA05 


1503 

P03D8 

ODCl 

lOAlD 

INQ 

1 


1504 

P03D9 

EAIA 


LOQ» 

I OA T , 

Q 

1505 

P03DA 

CAOO 


LDA 

lOlfOl 

,Q 


P03DB 

FC27 





15G6 

15Q7 

P03DC 

6127 


STA- 

¥39,1 


150 8 







1509 







1510 




COHE 

H ERE 

TO 


COME HERE AFTER THE lOUP REQUEST HAS BEEN VALIDATED 
CHECK IF THE OUTPUT IS TO PRINTER 
IF YES SET THE FLAG V39,I 

INITIALIZE FOR THE TABLE SEARCH 

NO MATCH FOUND SKIP 
MATCH FOUND 

OTHERWISE SET TO NEXT TEBLE ENTRY 

GET THE PARAMETER ADDRESS 
X PARAMETER 


COME HERE TO INITIALIZE THE READING OF THE INPUT DEVICE 


1512 

P03DO 

0844 

IOA15 

CLR , 

1513 

P0 3DE 

61 IE 


STA- 

1514 

P03DF 

61 IF 


STA- 

1515 

P03EB 

6122 


STA- 

1516 

P03E1 

6123 


St A“ 

1517 

P03E2 

6124 


STA« 

1518 

P03E3 

6125 


STA- 

1519 

PO 3t 4 

6134 


STA- 

1520 

P0 3E5 

6126 


■ STA- 

1521 

PQ3E6 

0901 

IOA2S 

INA 

1522 

P03E7 

6 1 lA 


■ SIA- 

1523 

P03E8 

611C 


, STA- 

1524 

P03E9 

0 901 


INA 

1525 

P03EA 

6110 


STA- 

1526 

P03EB 

C 136 


LDA- 

1527 

P03EC 

680 0 


STA 


P03EO 

04C1 



1528 



^ .. 

GET ’ 

1529 




1530 

1531 

P03EE 

QCOl 

jip- 

- ENQ 

1532 

P0 3EF 

5800 


RTJ 


P03F0 

FF BB 



1533 



3(4 


1534 




AND 

1535 






V3Q ,I 
V31,I 
V34,I 
V35tl 
V36,I 
V37,I 
Y37Q,I 
V38, 1 
1 

V26,I 
V28, I 
1 

W29,I 

VABUF,I 

lOSZOK^l 


INDEX 
CLEAR 
CLEA R 
INDEX 
CLEAR 
CLEAR 


FLAG 


TO CONTROL BUFFER 
CURRENT READ MODE 
READ MODE CHANGE 
TO INPUT DATA 
CONTROL WORD 
NUMBER OF RECORDS READ 
QUOTIENT 

CLEAR NUMBER OF FILES READ 
INITIAL SGRACH ADDRESS 


CURRENT ENTRY 


SCRATCH ADDRESS F OR : CURRENT CONTROL SUFFER 
SCRATCH ADDRESS FOR NEXT DATA BUFFER 


GET PHYSICAL DEVICE- TABLE ADDRESS FOR INPUT UNIT 


1 

IOS12 


AND EXIT TO THE APPROPRIATE INPUT ROUTINE 


N830 

1 

487 

N830 

1 

488 

N830 

1 

489 

N830 

1 

49 0 

N830 

1 

491 

N830 

1 

492 

N330 

1 

49 3 

N830 

1 

494 

N830 

1 

49 5 

N830 

1 

496 

N830 

1 

49 7 

N830 

1 

498 

N830 

1 

499 

N830 

1500 

N830 

1 

501 

N830 

1 

502 

N830 

1 

503 

N83D 

1504 

N83Q 

1 

505 

N830 

1506 

N830 

1 

50 7 

N830 

1 

50 6 

N830 

1 

509 

N830 

1510 

N830 

1511 

N83Q 

1 

512 

N830 

1 

513 

N830 

1 

514 

N33Q 

1 

515 

N830 

1 

516 

N83Q 

1 

517 

N83Q 

1 

518 

N830 

1 

519 

N8313 

1 

320 

N83Q 

1 

521 

N83G 

1 

52 2 

N83G 

1 

523 

N830 

i 

52 4 

N830 

1 

525 

N830 

1 

52 6 

N830 

1 

527 

N833 

1 

528 

N83G 

1 

529 

N830 

1 

53 0 

NS3B 

1531 

N830 

1 

53 2 

N830 

1 

533 

N830 

1 

53 4 

N83D 

1 

535 

N830 

1 

53 6 


L.-' 



I0UPV4 


Q 

153 6 

PO 3F1 

El 17 

LDG- 

o ■ 

1537 

1538 

P03F2 

1622 

JMP- 


PAGE 36 OATEt 08/19/99 

V23,I 
(ZERO), Q 


O 

o 

o 


1540 » 

1541 P03F3 0003 lOAT NUM 

1542 PQ3F4 0004 NUM 

1543 PD3F5 0009 NUM 

P03F6 DQ06 NUM 

1545 P03F7 00GB . NUM 

1546 P03F8 D0Q7 • NUM 

1547 P03F9 8000 NUM 

1548 ^ 


3 

+ 03 


CL 

4 

4TH 

PARAMETER 


9 

+ 09 


ML 

6 

6TH 

PARAMETER 


11 

+ 11 


HB 

7 

7TH 

PARAMETER 


$8000 

END 

OF TABLE 



o 

o 

o 

o 

o 

o 

o 

o 


o 

o 

o 


N8301 537 
N83Q1 533 
N8301539 


N8301541 
N8301542 
N8301543 
N8301544 
N8301 545 
N83D1546 
N8301547 
N8301548 
N33Q1549 


c 

□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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1550 






1551 






1552 




READ THE CAROS 


1553 






1554 

P03FA 

Cl 2 0 

IOC 

LDA- \/32,I 

RECORD SIZE 

1555 

P03FB 

6121 


STA- V33,I 


1556 






1557 

P03FC 

0 8 44 


CLR A 


1558 

PC3FD 

5800 


RTJ I OS 3 8 

GET THE READ REQUEST CODE 


P0 3FE 

Q5B6 




1559 

P03FF 

6804 


STA'^ IOC50 


156 0 






1561 

P040 0 

E102 


LDQ- V02»I 

INPUT LU 

1562 

P04G1 

5800 


RTJ IOS20 

READ A CARD 


PO 402 • 

0 4 A3 




1563 

P0403 

QDOO 

IOC50 

HUM 0 

REQUEST CODE 

1564 

P04G4 

1837 

lOGlOO 

JMP» IOC130 

ERROR RETURN 

1565 




NO ERROR RETURN 


156 6 

P0 40 5 

58C1 

lOCllO 

RTJ» lOSB 

UPDATE NBR OF RECS 

1567 






1568 

P0406 

OCOl 


ENQ i 

CHECK CHANGE IN READ MODE 

1569 






157 0 

P0407 

5800 

lOCil 5 

RTJ IOS23 



PD4D8 

04CB 




1571 

P0409 

1806 


JMP'^^ IOC140 

NO CHANGE OF READ NODE 

1572 






1573 




FOR THE CHANGE OF 

MODE 

1574 






1575 

P040A 

G02F 


LOA- 0NEPIir*12 


1576 

PQ-40B 

6122 


STA- ¥34^1 

SET THE READ MODE CHANGED FLAG 

1577 

P04QC 

BllF 


EOR- ¥31,1 

REVERSE THE READ MODE 

1578 

P04DD 

611F 


STA- ¥31,1 


1579 

P040E 

18 03 


JMP» IOC 15 0 


1580 



* 



1581 



'¥■ 

FOR NO CHANGE IN READ MODE RESET THE ¥34 FLAG 

1582 






1583 

P040F 

0 8 44 

IOG140 

CLR A 


1564 

P0410 

6122 


STA- ¥34,1 


1585 




UPDATE NO OF WORDS 

READ AND INDEX INTO IBUF2 

1586 






1587 

P0411 

C123 . 

IOC150- 

LDA- ¥35,1 

INDEX 

1588 

P0412 

8121 


ADD- ¥33,1 

ACTUAL NO OF WORDS READ 

1589 

P0 413 

6124 


STA- ¥36,1 

CONTROL WORD 

1590 






1591 






1592 




CHECK WHETHER DATA 

IS TO BE WRITTEN ON INTERMEDIATE STORAGE 

1593 




OR NOT 


1594 




¥43 =0 WRITE 

V43.NE.0 DO NOT WRITE 

1595 






159 6 

P0 414 

C12B 


LDA- V43,I 


1597 

P0415 

0112 


SAN 2 

63* 

1598 

P0 416 

5305 


RTJ* I0C160 

CHECK IF SCRATCH IS AVAILABLE. 

1599 

P0417 

1811 


JMP* I0C175 



N8301551 
N3301552 
N8301 553 
N8301554 
N8301 555 
N8301 556 
N8301557 
N8301 558 
N8301559 

N8301 560 
N8301561 
N8301562 
N8301563 

NS30i564 
N8301 565 
N8301556 
N8301567 
N830i568 
N83Q 1569 
M8301570 
N8301571 

N8301572 
N8301573 
N83B1574 
N83Q1575 
N3301576 
M8301577 
N33G1 578 
N8301579 
N8301580 
N8301581 
N8301582 
N8301 583 
N3301584 
N83Q1585 
N3301586 
N8301587 
N83D1586 
N8301569 
N330159I3 
M8301591 
N8301592 
N8301593 
N8301594 
N8301595 
N8301 596 
N83G1597 
N8301598 
N8301 599 
N8301600 
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o 

1600 








N83016D1 


1501 




OTHERWISE EXIT 

TO -OUTPUT/COMPARE 


N8301602 


1602 








N8301603 

n 

1603 

P0418 

5800 


RTJ 

lORTJ 



NS301604 



P0419 

0 222 








1604 

P041 A 

1810 


JHP» 

I0C177 



N83D 1605 


1605 



* 





N8301606 

n 

1606 



Jf 

BEFORE WRITING 

CHECK MORE SCRATCH AyLE FOR THIS 

WRITE. 

N3301607 


1607 








N830 1608 


160 e 

P0 41B 

00 00 

IOC160 

NUN 

0 



N8301609 


160 9 

P04iC 

.9 8 42 


CLR 

Q 



N8301610 

o 

1610 

P041D 

G121 


LDA- 

V33,I 



N83D1611 

1611 

P041E 

30 0 0 


□VI 

= N96 



N8301 612 



P041F 

0 0 60 








1612 

PO 420 

01 41 


SQZ 

1 



N8301 613 

o 

1613 

P0421 

0901 


IMA 

1 



N8301614 


1614 

P0422 

912A 


SUB- 

'/42,T 



N3301615 


1615 

PQ423 

811D 


AQD- 

\?29»I 



N8301616 


1616 

P0424 

0121 


SAP 

1 



N8301617 

D 

1617 

P0425 

1CF5 


JMP^ 

ciocieo) 

OK — SCRATCH AVAILABLE 


N33 01618 


1618 

P0426 
pn £i'?7 

1800 


JMP 

IOS107 

OTHERWISE REJECT AND PRINT OIAGNOSTIV 

N3301619 


1619 








N8301620 

o 

1620 

PQ 428 

5800 

I0C175 

RTJ 

I0S24 

WRITE DATA ON INTERMEDIATE STORAGE 

N8301621 



P0429 

04B3 








1621 

PG42A 

0 8 44 

I0C177 

CLR 

A 



N8301622 


1622 

P042B 

6123 


STA- 

V35,I 



N8301623 

o 

1623 

P042C 

6124 


STA- 

V36,I 



N8301624 

162 4 








N83Q1625 


1625 



if- 

REAO 

NEXT CARD 



N83G1626 


162 6 








N8301627 

o 

1627 








N8301628 

1628 




CLEAR THE READ 

BUFFER I08UF2 BEFORE READING NEW 

DATA 

N8301629 


162 9 

P0 42T) 

58 0 0 


RTJ 

I0S39 



N830163D 



P.0 42E 

Q5B8 







o 

1630 








N8301631 

163 1 








N8301632 


1632 



if 

FOR THE yen REQUESTTC00E=16) CHECK IF SPECIFIEO 

N NBR OF 

N63Q1633 


163 3 




CARDS READ NOW 



N8301634 

o 

1634 








N83Dlfa35 


1635 

P042F 

C129 


LDA- 

i/08,1 

REQUEST CODE 


N8301636 


163 6 

P0430 

09EF 


INA 

-16 



N8301537 


1637 

P 04,31 

0118 


SAN 

I0G179 

SKIP IF NOT A VCM RECUEST 


N3301 638 

o 

163 8 








N8301639 

1639 




FOR THE \7GM REQUEST 


N8301640 


164 0 








N8301641 


1641 

P0 432 

Cl 2 B 


LDA- 

V43,I 



N83Q 1642 

n 

1642 

P 0 433 

0103 


SAZ 

I0C178 

SKIP IF SCRATCH USED 


N83Q1643 

kJ 

1643 



if 





N8301644 


1644 

P0 434 

C12F 


LDA- 

¥04Q, I 

OTHERWISE CHECK lO’f^A. VALUE 


N8301 645 


1645 

P0435 

9134 


sue- 

y37Q,I 



N.3301 64b 

O 

1646 

P0436 

0113 


SAN 

I0C179 

SKIP IF NOT DONE 


M83Q1647 

1647 








N8301 £48 


O 

O 

O 


O 

O 

o 

o 

o 

o 


o 


o 

o 

o 

o 


o 


o 


o 


o 
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1648 

1649 

1650 

1651 

1652 

1653 
1 65 4 

1655 

1656 


PQ437 

P0438 

P0439 


C104 
9125 
0 103 


P043A 18BF 


P043B C1D2 


1657 

1668 

1669 

1670 

1671 

1672 
1573 
167i* 

1675 

1676 

1677 

1678 

1679 

1680 


P0442 D135 
PQ443 C12B 
P0444 0102 
P0445 1800 
PQ446 D30B 


P0447 
P0 448 
PG449 
PD44A 
P0 44B 
PO 440 
P044D 
P044E 
P044F 


COOO 

5555 

Ell£ 

F137 

6622 

5800 

04BF 

1800 

OlED 


I0C178 


I0C179 


IOC180 


LDA- V04,I 
SUB- V37,I 
SAZ IOC190 


NBR OF RECORDS READ SO FAR 
SKIP IF THE NBRS ARE EQUAL 


1657 



'■tr 

155 8 



■Sf 

1659 

1660 

P043C 

5800 



P043D 

0522 


1 6, 6 1 
1662 

P0‘+3E 

1804 


166 3 
1664 

P043F 

C1D2 

JtA 

1665 

PD440 

1800 



P0441 

0 2 63 


166 6 





JMP^ IOC 

CHECK ALL CAROS READ. GET STATUS OF THE DEVICE 

LDA- V02,I INPUT LU 

CHECK END OF INPUT DATA ON CARD READER 

RTJ IOS33 


IOC190 


JMP» IOC 19 0 
FOR ERRORS 
LDA- V02,I 
JMP IOR072 


RAO- V53,I 
LDA- V43,I 
SAZ I0C195 
JHP I0R131 


END OF DATA 


I/O ERROR MESSAGE 


SET END OF DATA FLAG (ALL 
CHECK IF DATA ON SCRATCH 
SKIP IF WRITTEN 
OTHERWISE EXIT 


DEVICES 


63*1385 

63*1385 


SET THE END DATA FLAG IN THE CONTROL BLOCK AFTER LAST ENTRY 


IOC195 LDA =NS5555 

LDQ- V30-,I 
ADO- VOBLiI 
STA- (ZERO),Q 
RTJ I0S25 

JMP lOR 


ENTRY IN CONTROL BUFFER 


WRITE THE CONTROL BUFFER 
EXIT TO OUTPUT THE DATA 


N8301649 
N8301 650 
N8301651 
N83Q1652 
N8301653 
N8301654 
N8301 £55 
N33G1 656 
N8301657 
N8301658 
N6301659 
N83016&0 
N8301661 

N8301 662 
N8301663 
N8301664 
N8301 665 
N8301 £66 

N8301667 

NS301668 

N8301669 

N8301670 

N8301671 

N83G1672 

N8301673 

N8301674 

N8301675 

N8301676 

N83Dlc77 

N8301678 

N8301679 

N8301680 

N8301681 
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DATES 08/19/99 

o 

1662 









1683 









16B4 




COHE HERE TO 

READ 

MAGNETIC TAPE 


o 

1685 

1686 



'Jf- 





1687 

P0450 

C02F 

lOM 

LOA- ONEBIT+12 



o 

1588 

1689 

P0451 

611F 


STA- y3i,i 




169 0 



-?(■ 

INITIALIZE TO 

READ 

MAX RECORD SIZE JASSY 

PARAM 


1691 







1692 

P0452 

C120 

lOMlO 

LDA- V32,I 


NUMBER TO BE READ 


o 

1693 

P0453 

6121 


STA- V33^I 


NUMBER ACTUALLR READ 


1694 

P0454 

PD455 

P0456 

5 80 0 
0591 
DA CO 


RTJ I0S39 


CLEAR THE I0BUF2 FOR 

NEXT D 


1695 


ENA 0 




o 

1696 

P0457 

5800 


RTJ I0S38 


GET THE REQUEST CODE 



P0458 

0 5 5C 






1697 

P0459 

6804 


STA» IOM12 




o 

169 8 
1699 

P045A 

E102 

Iff- 

LOQ- yo2,i 


INPUT LU 


1700 




READ MAGNETIC 

• TAPE 




1701 

1702 

P045B 

5800 


RTJ IOS20 




o 


P045C 

0449 






1703 

P0 45D 

OQOO 

I0M12 

NUM C 


REQUEST CODE 



1704 

1705 

PQ45E 

18 2C 


JNP» I0H175 


ERROR IN READ 


o 

1706 




NO READ ERROR 

RETURN 


1707 









170 8 

P046F 

0 8 44 


CLR A 


RESET READ MODE CHANGE FLAG 


1709 

PQ460 

6122 


STA- V34,I 




o 

1710 

1711 




UPDATE THE MO 

OF RECORDS READ 



1712 









1713 




UPDATE THE NUMBER 

OF WORDS READ 


o 

1714 
171 5 

P0461 

Cl 21 


LDA- V33,I 





1716 

P0462 

6124 


STA- V36,I 




o 

1717 
171 8 

P0 463 

5800 

JF- 

RTJ lOSB 


UPDATE NBR OF RECS 


1719 

P0 464 

FF62 

If. 







1720 




CHECK WHETHER 

THE 

SCRATCH IS TO BE USED 

OR NOT 

o 

1721 




V43=0 USE SCRATCH 

V43.NE.0 DO NOT USE SCRATCH, 

1722 









1723 

P0465 

C12B 

I0H15 

LDA- y43,I 


SKIP TO use SCRATCH 


o 

172a 

1725 

P0466 

0103 


SAZ I0H16 


SKIP TO USE SCRATCH 


1726 

PD467 

5800 


RTJ lORTJ 


OTHERWISE STAGE 2 




P046S 

01D3 






o 

1727 
172 8 

PD469 

1804 

9- 

JMP^ IOH140 




1729 




WRITE THE DATA READ ONTO SCRATCH AREA OF 

THE 


N83D1683 
N83Q16B4 
N8301 685 
N8301686 
N83D168r 
N8301688 
N83G1689 
N83 0169 0 
N83C1691 
N8301692 
N8301693 
N8301694 
N8301695 

N8301696 

N8301697 

N8301698 
N8301699 
N830 1700 
N 330 1701 
N8301702 
N83D1703 

N8301704 
M83Q 1705 
N8301706 
N8301707 
N8301708 
N8301709 
N8301710 
N8301711 
N3301712 
N8301713 
N83Q1714 
N83Q1715 
N8301716 
N8301717 
N83G1718 
N8301719 

N830172D 

N8301721 

N8301722 

N83D1723 

N8301724 

N83Q1725 

N8301726 

N8301727 

N8301728 

N8301729 

N83D1730 


O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 
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DATE? 08/19799 


o 

o 

o 

o 

o 

o 




o 

o 

o 

o 

o 

o 

o 

o 


173C 
1731 
173P 
1733 
1 73 4 

1735 

1736 

1737 

1738 

1739 

1740 

1741 

1742 

1743 

1744 

1745 

1746 

1747 

1748 
17 49 

1750 

1751 

1752 

1753 

1754 

1755 

1756 

1757 

1758 

1759 

1760 

1761 

1762 
17 63 
176 4 

1765 

1766 

1767 

1768 

1769 

1770 

1771 

1772 

1773 

1774 

1775 

1776 

1777 

1778 


P046A 58BC 

P0468 5800 
P046C 0470 


P046O C128 


P046E OlOA 
P046F C12B 
P0470 0103 

P0471 C12F 
P0472 9134 
PD473 0114 


P0474 

P0475 

P0476 


C104 

9125 

0111 


P0477 18CA 
P0478 1809 


* 

T0M16 

IOM17 

«• 

IOM14 0 


LIBRARY UNIT 
RTJ» IOC160 
RFJ I0S24 


WRITE ON SCRATCH 


FOR yMM REQUEST CHECK SPECIFIED NUMBER OF RECS CHECKED. 
LDA- V40,I 


SAZ 

LDA" 

SAZ 


I0H147 

V43,I 

I0M142 


FOR VMX REQUEST CHECK SPECIFIED NUMBER OF 
RECORDS STORED 

NOT A VMX REQUEST 

SKIP IF SCRATCH ISED 

CHECK QUOTIENTS 

SKIP IF NOR DONE 


IOM142 
I OM 1 4 5 


LDA- VG4Q,, I 
SUB- V37Q,I 
SAN I0H145 

LDA- V04»I 
SUB- V37,I 
SAN I0M145 

JMP’*^ IOC190 

JMP» lOHlD 

CHECK RECOROS/FILES BEING TRANSFERRED 


SKIP IF NOT DONE 
ALL DONE 


P0479 

5300 

I0M147 

RTU 

lOSA 

P047A 

FF38 - 




P047B 

1 8 D6 


JMP* 

lOMlO 

PD47C 

C12B 

I0M148- 

LDA- 

V43, I 

P 0470 

0106 


SAZ 

IOH150 

P0 47F 

0D2B 


INQ 

43 

P0 47F 

CAQG 


LDA 

IOV01,I 

PQ480 

FB8Z 




P0481 

9134 


sue- 

V37Q»I 

P0482 

0OD4 


INQ 

-43 

PD483 

0114 


SAN 

I0M155 

PO 484 

CADD 

IOM150 

LDA 

lOVOl , 

P0465 

FB7D 




P0486 

9125 


SUB- 

V37,I 

P0487 

0101 


SAZ 

I0H173 

P0488 

18C9 

I0M155 

JMP» 

lOWlO 


SKIP IF USED 
GET QUOTIENT 

SKIP IF NOT ALL DONE 


SKIP IF ALL DONE 

OTHERWISE GET NEXT RECORD IF ANY 


N8301731 

N8301732 

N8301733 

N83Q1734 

N83Q1735 

N8301736 
N83D1737 
N8301738 
N8301739 
N8331 740 
Na3Q1741 
N3301742 
N8301743 
N8301744 
N8301745 
N8301746 
N83Q17sf7 
N8301748 
N8301749 
N630175C 
N8301751 
N8301752 
N8301753 
N83D1754 
N8301 755 
N8301 756 
N8301 757 
N3301 758 
N8301 759 
N83ei760 
N83G1761 


N830 

N83D 

N830 

N830 

N830 

N830 

N830 


1762 

1763 

1764 

1765 
1 766 

1767 

1768 


N8301769 

N8301770 

N8301771 

N8301772 

N8301773 

N8301774 

N83D1775 
N8301776 
N8301 777 
N8301778 
M83D1779 


O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 
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DATE 


08/ 19/99 


1779 

PQ489 

18B8 

1780 



1781 



1782 



1783 

PD48A 

C1Q2 

1 784 

P048B 

5800 


P048C 

0 4D3 

1785 

P048O 

1803 

1786 

P.0 48E 

18 IF 

1787 

PG48F 

1819 

178 8 



1789 



1790 



1791 

P0 49Q 

D126 

1792 

P0491 

D135 

1795 

PD492 

580 0 


P0493 

FF33 

1794 



1795 

P0494 

C1Q2 

1796 

P0495 

E849 

1797 

PG496 

58QD 


P0497 

Q4E9 

1798 



1799 

P0498 

C12B 

1800 

P0499 

0103 

1801 



1802 

P049A 

5800 


PQ49B 

OlAD 

180.3 

PQ49C 

1802 

1804 



1805 

P049D 

582A 

1806 



1807 

PG49E 

5800 


P049F 

FF13 

1808 

PD4A0 

1802 

1809 



1810 

PG4A1 

18 DA 

1811 



1812 

PD4A2 

C126 

1813 

P0 4A3 

9A00 


P04A4 

FB5E 

1814 

P04A5 

Dill 

1815 



1816 

P04A6 

18E2 

1817 



181 8 

PQ4A7 

18AA 

1819 



1820 



1821 



1822 

P04A8 

C122 

1823 

P04A9 

0108 

1824 

P04AA 

C102 

1325 

P04AB 

1800 


PQ4AC 

Q1F8 


IOH173 

» 

* 

IOM175 


IOH176 


JMP’^ IOC190 

COHE HERE FOR A READ ERROR. 


L0A- V02,I 
RTJ I0S33 

JNP» I0H176 
JMP» I0H183 
JMP» I OH 181 


INPUT LU 
CHECK STATUS 

■EOF 

OTHER ERRORS 
PARITY ERROR 


FOR THE END OF FILE 

RAO- V38tl 
RAO- ¥53,1 


RTJ lose 


BU8P NBR OF FILES 
SET EOF ON INPUT UNIT 
BUHP NBR OF RECS 


LDA- ¥02,1 
LDQ’ I0MS6L 
RTJ I0S35 


PRINT EOF ON LU HESSAGW 


LDA- 

SAZ 


¥43,1 
I0M17 7 


IGH177 

ION17S 


■y 

IOH179 


IOM17A 

I0H181 

I0H182 


RTJ lORTJ 

JMP’*- I0H178 

RTJ» IOH190 

RTJ lOSA 

JMP» I0H179 

JHP» I0N148 

LDA- ¥38 ,I 
SUB IO¥01,Q 

SAN IOM17A 

JMP» I0M173 

JMP» lOHlO 

FOR PARITY ERROR 

LDA- ¥34,1 
SAZ I0M184 
LDA- ¥02,1 
JMP I0RQ72 


CHECK SCRATCH USED OR NOT 
SKIP IF USED 

OTHERWISE OUTPUT EOF 


WRITE EOF FLAG J5554 
■ CHECK R/F TRANSFER 
' FOR FILES 
FOR RECS 

CHECK ALL FILES DONE 

SKIP IF NOT 
OTHERWISE EXIT 
GET NEXT DATA 

CHECK IF ANY CHANGE OF NODE DETECTED 


FOR NO CHANGE OF. MODE. 

LU REJECT IF MODE CHANGED 


N8301730 
N8301781 
N83G1782 
N8301785 
63'»1384 N83Q1784 

63’^1384 N8301785 

N8301786 

N8301787 

N3301788 

N8301789 

N83C1790 

N8301791 

N8301792 

N8301793 

N8301794 

N8301 795 
N83D1796 
N8301797 
N8301798 

N83D1799 

N83G1800 

N8301801 

N83G1802 

N83G1803 

N8301804 

NS3Q1805 

N8301806 

N8301807 

N83018D8 

N8301809 

N830181G 

M8301811 

N8301312 

N8301813 

N8301814 

N8301815 
N8301816 
N8301817 
N83S1818 
N8301819 
N33Q1320 
N33 01821 
N8301822 
N8301823 
N3301824 
N8301825 
N3301826 
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DATEI 08/19/99 


1826 

1827 

1828 

1829 

1830 

1831 

1832 

1833 

1834 

1835 

1836 

1837 

183 8 
1859 

1840 

1841 

1842 

1843 

1844 

1845 

1846 

184 7 

1848 

1849 

1850 

1851 

1852 

1853 


P04AD 

P04AE 

P04AF 

P04B0 


C20C 

AD2C 

0111 

18F9 


P04B1 1807 


P04B2 CllF 
P0 4B3 BD2F 
PQ4B4 611F 


P04B5 

P04B6 


PO 4B7 
P04B8 

P0-4B9 
P04BA 
PO 4BB 


0 AQl 
6122 


C102 

6805 

54F4 
5000 
0 4C0 


■» 

I0H183 


I OH 18 A 
»■ 

I0H184 






LDA- 12»Q 
AND- ONEBITs-' 
SAN I0H18A 
JMP» I0M182 

JMP* I0H173 

TRY A READ W 


CHECK END OF TAPE 

SKIP IF END OF TAPE 
OTHERWISE REJECT 

JHP IF END OF TAPE 

ITH THE REVERSED MODE 


LDA- V31,I 
EOR- ONEBiTa-: 
STA- V31,l 


12 

SET MODE CHANGED FLAG 


ENA 1 
STA- V34,I 

READ AGAIN 

BACKSPACE ON 

LDA- V02»I 
STA^ I0H185 

RTJ- JAHONII 
NUM $5C0fl 
ADC I0M188 


E RECORD IN CASE OF PARITY ERROR 
■LU 


+0 RC TAPE MOTION REQUEST 
H GA 


1855 

P04BC 

00 00 

I0M186 

ADC 

Q 

+ 2 T 


1856 

P04BO 

0 0 00 

I0M185 

NUM 

0 

*•3 V,M,A,LU 


1857 

P04BE 

10 00 


NUM 

$1000 

+4 BACKSPACE A RECORD 

1858 

1859 
1850 

PG4BF 

14EA 


JMP- 

{AOISFI 



1861 

PQ4C0 

COOQ 

I0M188 

LDA 

= XIOV 

RESTORE I 



P0 4C1 

0 0 02 P 






1862 

PO 4C2 

60FF 


STA- 

I 



1863 

1864 

PQ 4C3 

C8F9 


LDA* 

I0M185 

CHECK ANY ERROR 


1865 

P04C4 

0121 


SAP 

I0M189 



1866 

1867 

P04C5 

13E4 . 

» 

JHP» 

I0M1B2 

NO ERROR 


1868 

P0 4C6 

1 8 8B 

I0M189 

JMP» 

lOMlO 


1369 



s- 





1870 







IN THE 

1871 



*■ 

S/R 

TO ENTER $5554 

AS EOF INDICATOR 

1872 




ADC 




1873 

P0 4C7 

0 0 00 

IOH190 

0 



1374 

P0 4C8 

COQO 


LDA 

=N$5554 




P04C9 

5554 




INDEX TO CONTROL 

BUFFER 

1875 

P04CA 

EllE 


LDQ- 

¥30,1 

1876 

P04CB 

6EOO 


STA 

(lOVQH- VOBL-1) 

,Q 



P0 4CC 

FB6C 







63^1 385 


M83C1827 
N8301828 
N8301829 
N83Q1830 
N8301831 
N8301332 
N8301833 
NB301834 
N83D1335 
N8301336 
N8301 837 
N83D1838 
N8301839 
N8301840 
N8301.841 
N83G1842 
N8301843 
N83D1844 
N83Q1845 
N8301846 
N8301347 
N8301848 
N8301849 
N33D185D 
N8301S51 
N8301852 
N8301853 
N8301 854 
N3301855 
N8301856 
N8301857 
N8301858 
N83D1859 
N8301860 
N8301861 
N3301862 

N3301863 

N83G1864 

N3301865 

N8301866 

N33Q1867 

N83Q1868 

N8301869 

N83Q1870 

N83fll871 

N8301872 

N3301873 

N8301874 

N3301875 

N83Q1876 

N8301377 


I0UPV4 
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DATE: 06/19/99 


r-i 

o 

o 

o 

o 

o 

o 

o 

o 

o 

0 

o 

o 

o 

o 

o 

o 


1877 

P04CD 

0 DAO 


I NO. 

-95 

1878 

P0 4CE 

0152 


SON 

I0M195 

1879 

P04CF 

5800 


RTJ 

I0S25 


P0400 

043C 




1880 






1881 

P04O1 

DUE 

I0M195 

RAO- 

V3D,I 

1882 






1883 




EXIT 


1884 

1885 

P04D2 

1CF4 


JMP» 

■II0Mi9 

1366 







NOT THE END OF CONTROL BUFFER 
OTHERWISE WRITE CONTROL BUFFER 


UPDATE INDEX TO CONTRIL BUFFER ENTRY 


NS3D1878 

N8301879 

N830188G 


N830 
N830 
N830 
N830 
N830 
N83 0 
N830 


1881 

1882 

1883 

1884 

1885 

1886 
1887 


1888 





1889 




EOF 

1890 





1891 

PD 403 

454F 

I0HS6 

ALF 


P0 4D4 

4620 




PD4D5 

4F4E 




P04D6 

2 0 49 




P04D7 

4E5D 




P'0 4’D8 

5554 




PG409 

2 0 4C 




P04DA 

5520 




P04D8 

4E 4E 




P04DC 

4E4E 



1892 

PD4DD 

200D 


NUM 

1893 



If- 


1894 

Pe4G£ 

0403 P 

I0MS5L 

AOC 

1895 



-9- 



FOUND MESSAGE 
10, EOF ON INPUT lU NNNN 


N8301889 

N830169D 

N8301891 

N8301892 


$20 00 
I0MS6 


N8301893 

N8301894 

NB301895 

N8301896 


o 

o 

o 

o 

■ o 

• o 

■ o 

: o 

o 

; Q 

: 

o 

o 

o 

o 

• o 
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1897 




1898 




1899 




190 D 




1901 




1902 




19 0 3 




1904 




1905 




1906 




1907 

PG 4DF 

Cl 

09 

190 8 

P0 4E0 

90 

00 


P04E1 

50 

50 

1909 

P04E2 

0111 

1910 

P04E3 

18 

OE 

1911 




1912 

P04E4 

Cl 

29 

1913 

P04E5 

GC 

03 

1914 

P0 4E6 

09 

F9 

1915 

P04E7 

01 

11 

1916 

PG4E8 

OQ 

01 

1917 

PQ4E9 

CA 

00 


P0 4EA 

FB 

18 

1918 

P04EB 

BO 

32 

191 9 

P04EC 

D98E 

1920 

P04EO 

01 

02 

1921 

P0 4EF 

08 

44 

1922 

P04EF 

1 8 

02 

1923 




1924 

P04F0 

CO 

2F 

1925 

P0 4F1 

61 

IF 

1926 




1927 

P04F2 

58 

OQ 


P04F3 

0 4F3 

1928 




1929 




193 0 

P04F4 

OA 

OQ 

1931 

PO 4F5 

58 

00 


PD4F6 

04 

BE 

1932 

PG4F7 

68 

06 

1933 




1934 

P04F8 

Cl 

20 

1935 

P04F9 

61 

21 

1936 

P0 4FA 

El 

02 

1937 

PD4FB 

58 

00 


P04FC 

03 

A9 

193 8 

P04F0 

00 

00 

1939 

P04FE 

1831 

1940 




1941 

PQ 4FF 

Cl 

IF 

1942 

P05DO 

01 

01 

1943 

P0501 

CO 

32 

1944 

P05Q2 

B1 

21 


n- 

'» 

■?■ 

9 

» 

TOP 


lOPlO 


IOP20 


IOP30 

IOP40 

¥ 

IOP50 

»■ 


COME HtPE TO REAO THE PAPER TAPE 
SET UP TO READ THE PAPER TAPE 

GET THE REQUESTED HCOE OF READ 


LDA- V09il 
SUB =N$5050 


SAM 

JMP» 

LDA- 

ENQ 

IMA 

SAN 

INQ 

LDA 

EOR- 

INA 

SAZ 

CLP 

JMP^ 


lOPlO 

IOP40 

\7Q8,I 

3 

-6 

IOP20 

1 

iO';oi,a 

ONEBIT^-15 

-$41 

IOP30 

A 

IOP40 


LDA- 0NEBIT»-12 
STA- V31,I 

RTJ I0S39 


ENA 0 
RTJ IOS38 

STA=^ I0P55 

LDA- V32,I 
STA- V35,I 
LOQ- VOZfl 
I0S2Q 


IOP55 

T- 

lOPlQ Q 


RTJ 


MUM 0 
JMP* IOP150 

LDA- V3l,T 
SAZ IOP180 
LOA- ONE8IT9-15 
EOR- V33tl 


CHECK FOR $PP/$VPP REQUESTS. FOR THESE 


NOT A SPP/SVPP REQUEST SKIP 
SET UP FOR BINARY READ 


SKIP IF 
FOR PB 


NOT A P8 


SKIP IF ASCII MODE 
SET FOR BINARY MODE 


CLEAR I08UF2 FOR NEXT DATA 


GET REAO MODE AS PER REQUEST CODE 


INPUT LU 

READ THE INPUT DEVICE 

REAO(0200)/ FREAD C08001 
FOR ERROR ANALYSIS 

READ MODE 
SKIP IF BINARY 

NO OF WORDS ACTUALLY READ 


N83Q1898 
N8301899 
N330 19G C 
N83019D1 
N83Q1902 
N8301903 
N8301904 
N8301905 
M8301906 
N8301907 
N830i908 
N83B1909 

N830191C 

N8301911 

N8301912 

N8301913 

N8301914 

N8301915 

N8301916 

M8301917 

N8301918 

N8301919 

N83G192G 

N830192i 

N830192? 

N8301923 

N8301924 

N83G1925 

N8301926 

N8301927 

N8301928 

N83B1929 

N83D193D 

N8301931 

N83Q1932 

N83Q1933 

N8301934 

N83S1935 

N33D1936 

N8301937 

N830t938 

N83D193 9 
N8301940 
N8301941 
N83Q1942 
N8301943 
N8301944 
N8301945 
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date: 08/19/99 


1945 

P05G3 

El IE 


LDO- 

V30 ,I 

INDEX TO CURRENT ENTRY IN CONTROL BUFFER 

1946 

PO 504 

F137 


AOQ- 

VDBLt I 


1947 

P0505 

6622 


STA- 

(ZERO),Q 


1948 



♦ 




1949 




GET 

THE NUMBER OF 

WORDS TO BE WRITTEN 

1950 







1951 

P0506 

C121 


LDA- 

V33,I 


1952 

PG507 

9123 


SUB- 

V35,I 


1953 

P05C8 

6124 


STA- 

V36,I 


1954 







1955 

P0509 

C12B 


LDA- 

V43»I 

CHECK WHETHER SCRATCH TO DE USED 

1956 

P050A 

0115 


SAN 

IOP107 

SKIP IF SCRATCH -NOY USED 

1957 







1958 

P050B 

5800 


RTJ 

IOC160 

CHECK IF SCRATCH IS AVAILABLE 


PQ50C 

FFOE 





1959 







1960 




WRIT 

E TO SCRATCH AREA 

1961 



•V- 




1962 

P050D 

5800 

IOP105 

PTJ 

I0S24 



P050E 

03CE 





1963 

P050F 

1803 


JHP* 

lOPllQ 


1964 







1965 

PG51G 

5800 

IOP107 

RTJ 

lORTJ 

OUTPUT RECORD 


PD511 

012A 





1966 







1967 




UPDATE THE MUHBER 

OF RECORDS READ 

1968 







1969 

PO 512 

58 00 

lOPiiO 

RTJ 

lOSB 

UPDATE NBR OD RECS 


P0513 

FEB3 





197 0 







1971 




CHECK GIVEN NUMBER 

OF RECORDS READ 

1972 



'¥• 




1973 

P0514 

0C02 

IOP115 

ENQ 

2 


1974 

P0515 

C129 


LDA- 

VOS, I 

INDEX TO CURRENT REQYEST CODE 

1975 

P0516 

G9F9 


INA 

-6 


197 6 

P0517 

0137 


SAM 

I OP 12-4 

FOR PL, PC =4 

1977 

P0 518 

0105 


SAZ 

IOP120 

FOR ’P8 -5 

1978 

P0519 

09FE 


INA 

-1 


1979 

P051A 

0105 


SAZ 

IOP128 

FOR $PP = 3 

1980 

P051B 

09F5 


INA 

-10 


1981 

P051C 

0112 


SAN 

I0P124 


1982 

P0510 

18D4 


JMP» 

IOP50 

SVPP REQUEST 

1983 

P051E 

ODOl 

IOP120 

INQ 

1 


1984 

P051F 

ODOl 

I0P124 

INC 

1 


1985 

P052Q 

ODOl 

IOP128 

INQ 

1 


1986 



. ^ 




1987 

P0521 

C12B 

IOP130 

LDA- 

V43,I 


1988 

PQ522 

0106 


SAZ 

IOP132 

SKIP IF SCRATCH ISED 

1989 







1990 

P0523 

0D2B 


INQ 

43 


1991 

PD524 

CAOO 


LDA 

IOV01,Q 

CHECK QUOTIENTS 


P0525 

FAOO 





1992 

P0526 

0OD4 


INQ 

-43 



N3301946 

M33Q1947 

N83D19«8 

N8301949 

N33J1950 

M33C1951 

M3301952 

N83D1953 

N3301954 

N83D1955 

N330195& 

N8301957 

N8301958 

N3301959 

N830196D 

N8301961 

N8301962 

N8301963 

N8301964 

N8301965 

N33Q1966 

N8301967 

N8301968 

N8301969 

N830197D 

N8301971 
N8301972 
N8301973 
N8301974 
N8301975 
N8301976 
N8301977 
N8301978 
N8301979 
N8301 980 
N8301981 
N33G1982 
N8301983 
N8301984 
N83Q1985 
N8301986 
N8301987 
N8301988 
N8301989 
N33D1990 
H8301991 
H8301992 

N8301993 


O 

O 

o 

o 

o 

o 

o 

o 

o 


o 

o 

o 

o 

o 


o 

o 

o 

o 

o 

o 


r-^ 


o 

o 

o 

o 


o 


o 

o 


o 
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1993 

P0527 

9134 


SUB- 

\7370»I 



1994 

P0528 

0114 


SAN 

I0P135 

SKIP IF NOT DONE 


1995 








1996 

P0529 

CAOO 

I0P132 

LDA 

ioyoi,Q 




P052A 

FADE 






1997 

P0528 

9125 


SUB- 

V37tl 



1998 

P052C 

0101 


SAZ 

IOP140 

ALL DONE SKIP 


1999 








2000 

PQ52D 

18C4 

I0P135 

3>TP» 

IOP5 0 

READ NEXT DATA 


200 1 




ALL : 

INPUT IN 



2002 

PD52E 

1829 

IOP140 

JMP» 

IOP160 



2003 








2004 








200 5 



if- 

FOR I 

AN ERROR IN 

READ 


2006 




CHECK FOR A NOTION FAILURE 


200 7 
2008 

P052F 

C102 

IOP150 

LDA- 

y02,I 

FIRST INPUT LU 

63*1384 

2009 

P0530 

58 00 


RTJ 

I0S33 

CHECK STATUS 

63*1384 


P0531 

0 42E 






2010 

P0532 

1804 


JMP» 

I0P155 

END OF DATA 

, 63*1384 

2011 



% 




63*1334 

2012 






ERROR RETURN 

63*1384 

2013 



Of. 




63*1384 

2014 

P0533 

C1D2 


LDA- 

¥ 02,1 



2015 

P0534 

180D 


JMP 

IOR072 




P0535 

Q16F 






201 6 








2017 

P0536 

08 0 0 

IOP155 

LDA 

I0S2E 




P053? 

037E 






2018 

P0538 

A 0 31 


AND- 

ONEBIH-14 

CHECK SHORT READ 


2019 

PC 539 

0108 


SAZ 

IOP157 

SKIP IF NO SHORT READ 


2020 

2021 

P05SA 

E800 


LDO 

IOS2G 

FOR SHORT READ GET ACTUAL N8R OF 

WORDS 


PD53B 

037C 






2022 

PO 53 C 

F800 


AOO 

IOS2F 




P053D 

0 3 79 






2023 

PD53E 

ODFE 


INQ 

-1 



2024 

P053F 

G622 


LDA- 

(ZERO) ,0 



202 5 

PG540 

9800 


SUB 

IOS2G 




P0541 

0376 






2026 

P0542 

6121 


STA- 

V33,I 



2027 








2028 

P0 543 

0111 


SAM 

I0P157 



2029 

P0544 

1013 


JHP» 

I OP 16 0 



203 0 

P0545 

CilF 

I0P157 

LDA- 

V31,I 

WRITE THE DATA READ SO FAR 


2031 

P0546 

B121 


EOP- 

¥33,1 

NBR OF WORDS READ 


2032 

PD 547 

EllE 


LDQ- 

¥30,1 

INDEX TO CURRENT ENTRY IN CONTROL 

BUFFER 

2033 

P0548 

F137 


ADQ- 

¥DBL, I 



2034 

PO 549 

6622 


STA- 

IZERO )f a 



2035 
203 6 

P054A 

C121 

% 

LOA- 

¥33,1 

NBR OF WORDS TO BE WRITTEN 


2037 

P054B 

6124 


Sf A- 

V36,I 



2038 

P054C 

C12B 


LDA- 

¥43,1 




N8301994 

N8301995 

N8301996 

N8301997 

N83D1998 

N8301999 

N8302Q0O 

N8302001 

N8302002 

N8302003 

N8302004 

N8302005 

N83020D6 

N8302007 

N83Q20D8 

N83QZ009 

N8302Q10 

N83G2flll 
N8302012 
N8302Q13 
N8302014 
N830 2015 
N8302016 

N83G2Q17 

N8302018 

N8302019 
N830 2 02 0 
N83fi2 021 
N8302022 

N8302023 

N83D2024 

N8302025 

N8302026 

N8302027 
N8302028 
N8302029 
N830203D 
N83Q2031 
N83D2032 
N8302 033 
N8302034 
N83D2035 
N8302036 
N8302037 
N83Q2038 
N3502039 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


o 


o 
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DATE? 08/19/99 


a 

2039 

P0540 

0112 


SAN 

IOP15A 

SKIP IF SCRATCH NOT USED 

N33D2a40 


2040 







N83Q2Q41 


20 41 

P054E 

5800 


RIJ 

IOC160 

CHECK IF SCRATCH IS AVAILABLE 

N8302 042 

o 


P054F 

FEG8 






20 4 2 







N83Q2043 


2043 

PO 550 

58Q0 

IOP15 A 

RTJ 

lORTJ 

OUTPUT ONE RECORD 

N8302044 



P0551 

OOEA 






o 

2044 

P0 552 

1803 


JHP» 

I0P15B 


N83D2045 

2045 







N8302Q46 


2046 

P0 553 

5800 

I0P159 

RTJ 

IOS24 

WRITE DATA TO SCRATCH 

N8302047 



P0554 

0 388 






o 

2047 

P0555 

58 00 

I0P158 

RTJ 

loss 

UPDATE NBR OF RECORDS 

N8302048 

2048 

P0556 

F€70 





N83D2049 



2049 

PD557 

1800 

IOP160 

JMP 

I OC 19 0 

SET END OF DATA FLAG AND WRITE CONTROL 

N8302050 

o 


P0558 

FEE9 






2050 







N8302051 
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DATES 08/19/99 


O 


2053 
205 4 




COME 

HERE FOR 

2 0 5 5 




ENQ 


2056 

P0559 

OCOl 

lOT 

1 

2057 

P055A 

5800 


RTJ 

I OS 12 

P055B 

FE50 


CLR 

A 

2058 

P055C 

0844 


2059 

P055D 

6800 


STA 

I0T311 


P055E 

00A4 


STA 

I0T4Q8 

2060 

P055F 

6800 



P0560 

0 004 


LOQ- 

VOS ,I 

2061 

P0561 

E129 


2062 

PO 562 

FOOD 


ADQ 

=XIOT03 

P0563 

0 0 75 

P 


(ZERO),Q 

2063 

P0564 

E622 


LDQ- 

2064 

P0565 

1622 


JMP- 

tZERO.) ,Q 


MOTION CONTROL REQUESTS 

GET PHYSICAL DEVICE TABLE ADDRESS 

CLEAR REQUEST CODE WORD 
GET REQUEST INDEX 

SELECT PARAMETER VALIDATION ROUTINE 
AS PER THE REQUEST 


M8502054 

N8302D55 

N83D2056 

N83D2Q57 

N8302058 

N8302059 

N830206D 

N8302Q61 

N8302062 

N8302063 

N8302064 

N3302Q65 


O 

O 

o 

o 


2066 

2067 

2068 


2070 

2071 


2072 

P0566 

E103 

2073 

P0567 

01 43 

2074 

PQ568 

0814 

207 5 

P0569 

902F 

2076 

PD56A 

8132 

207 7 



2078 

P056B 

1800 

P 0 56C 

FB8B 

2G79 

PQ560 

C109 

208 0 

P056E 

OF 48 

2061 

P056F 

AQ OA 

2082 

P0570 

0 9 BE 

2083 

P0571 

0102 

208 4 

PQ572 

1800 

PO 573 

00 76 

208 5 

P0574 

1814 


^ FOR THE TAF, TAR^ TBF, AND TBR 

» CHECK THE 'PARAMETER TO BE 1-4095 FOR FIL/REC SKIP/BACK SPACING 


* 


lOTlGO 

LDQ- 

V03,I 


SQZ 

IOT105 


IRQ 

A 


SUB- 

ONE8IT>H2 


SAH 

lorioe 

IOT105 

JHP 

10210 

IOI106 

LOA- 

V09,I 


ARS 

8 


AND- 

LPHASKt-8 


INA 

-$41 


SAZ 

lOT 107 


BMP 

lOTBFR 

IOT107 

JMP* 

lOr AFR 


2ND PARAMETER 
ZERO IS INVALID 

LESS THAN 4096 
FORMAT ERROR MESSAGE 


FOR BACKSPACING 
FOR ADVANCING 


N8302067 
N8302068 
N8302069 
N8302Q70 
N83D2071 
N8302072 
N83Q2073 
N8302Q74 
N8302075 
N83G2076 
N830 2 0 7 7 
N83Q2078 
N8302079 

N83B2880 

N83Q2fl81 

N3302Q82 

N8302083 

N33Q2084 

N8302085 

N8302086 


O 

o 

o 

o 

o 

o 

o 


20 8 7 



» FOR 

TSD 

20 8 8 





2089 



» THE 

SECOND 

209 0 





209 1 

PB575 

E103 

I OHIO- LOQ- 

' ¥03,1 

2092 

P057& 

01 4E 

SQZ 

lOTll 

2093 






PARAMETER SHOULD BE 0,2, 5, 8 OR 16 

2ND PARAMETER „ 

6 SKIP IF DO NOTHING COMMAND 


N8302Q88 

N8302089 

N83B2090 

N8302091 

N8302092 

N83Q2093 

N8302094 


O 


o 
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DATEJ Q8/19/99 


o 

2094 

PC577 

OOFD 


INC >2 



N8302Q95 

O 


2095 

P0578 

0149 


SQZ I0T115 


SKIP IF 2. O.K. 

N8302096 



2096 



If- 



N8302Q97 


o 

2097 

P0579 

ODFC 


INQ -3 



N8302098 

: O 

2093 






N83D2099 


2099 

P057A 

0147 


SQZ iorii5 


SKIP IF 5. O.K 

N83021GD 



2100 






N83Q2101 


o 

2101 

P057B 

ODFC 


INQ -3 



N8302102 

O 

2102 







N83021D3 


2103 

PQ57C 

01 45 


SQZ lOfllS 


SKIP IF 8. O.K. 

N8302104 



2104 







N83321S5 


o 

210 5 

P057D 

0OF7 


INQ -8 



N8302106 

; O 

210 6 

PG57E 

01 41 


SQZ I0T114 


SKIP IF 16. OK 

N83Q2107 


210 7 

PQ57F 

18FB 


JHP’^ IOT105 


OTHERWISE REJECT 

N8332108 



2108 

PQ580 

0AD4 

I0T114 

ENA 4 


SET DENSITY CODE 

N8302109 


o 

2109 

P0581 

1804 


JMP^ I0T116 


GO STORE IT 

N8302110 

O 

2110 







N83Q2111 


2111 

P0582 

C103 

I0T115 

LDA- VQ3,I 



N8302112 



2112 

P0583 

A304 


AND- LPMASK«-2 



N6302113 


o 

2113 

P0584 

0 901 


INA 1 



N83Q2114 

o 

2114 

P0585 

6127 

I0T116 

STA- V39,I 


SAVE IT TEMPORARILY 

N83Q2115 


2115 

P 0586 

IfiDQ 


JMP lOTSO 



N83G 211 6 




P0587 

00 AO 







o 

211 6 







N83Q2117 

o 

o 

2113 







N3302119 

' o 


2119 



% 

COME HERE FOR SKIPPING FORWARD RECORDS/FILES ON A MAG, TAPE 

N830212C 



2120 



V- 




N8302121 


o 

2121 




INITIALIZE 



N8302122 

o 

2122 




V27=NUNBER 

OF 

RECORDS SKIPPED 

N8302123 


2123 




¥38=NUHBER 

OF 

FILES SKIPPED 

N8302124 



2124 







N83Q2125 


o 

2125 

PC588 

08 44 

lOTAFR 

CL R A 



N8 30 212 6 

; © 

212 6 

P0589 

6125 


STA“ ¥37,1 


NUMBER OF RECORDS SKIPPED 

N8302127 


2127 

P058A 

6126 


STA- ¥38,1 


NUMBER OF FILES SKIPPED 

N3302128 



2128 

P058B 

&11F 


SIA- V31,I 


BINARY READ MODE 

N3302129 


o 

2129 







N8302130 

o 

2130 



nf. 




N8302131 


2131 

P058C 

C102 

IOT150 

LDA- ¥02,1 


LU 

N8302132 



213 2 

PO 580 

6814 


STA'^ I0T162 



N8302133 


o 

2133 







N8302134 

o 


2134 




CHECK FILE/RECORD 

TO BE SKIPPED 

N8302135 


2135 



¥ 




N83QZ136 



2136 

PQ58E 

Cl 0 9 


LDA- ¥09,1 



N330 2137 


o 

2137 

P058F 

AOOA 


AND- LPMASK'^8 



N83B2138 

■ o 

2138 

PQ590 

0 9B9 


INA -$4& 



N830 2139 


213 9 

P0591 

0112 


SAN I0T154 


SKIP FOR RECORDS 

N8302140 



2140 



FOR FILE 



N8302141 


o 

2141 

P0592 

0A05 


ENA 5 


SKIP ONE FILE FORWARD 

N83G2142 

■ o 

2142 

P0593 

1802 


JM?» I0T156 



N8302143 

o 









o 


O 


o 
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DATE 


08/19/99 


2144 

P0594 

0 A07 

2145 



2146 

PD595 

OFCC 

2147 

P0596 

6800 

2148 



2149 



2150 

P0597 

C1Q2 

2151 

P0598 

580G 


P0599 

0330 

2152 

PG59A 

A02C 

2153 

P059B 

0101 

2154 

P059C 

161B 

2155 

PO 590 

54F4 

215 6 

P059F 

5C00 

215 7 

PQ59F 

05A4 

2158 

POSAD 

0000 

2159 

P05A1 

0 0 00 

2160 

P05A2 

00 00 

2161 



2162 

PQ5A3 

14EA 

2163 



2164 

PO 5A4 

coao 


PQ5A5 

0 0 02 

2165 

P Q 5A6 

6QFF 

2166 

P05A7 

Eil5 

216 7 

P05A8 

C20C 

2168 

P05A9 

6124 

2169 



2170 

P05AA 

A02E 

2171 

PG5AB 

0117 

2172 

P05AC 

C124 

2173 

POSAD 

A0 2C 

217*+ 

P05AE 

0113 

2175 

PO 5AF 

G3F1 

217 6 

P05B0 

G122 

2177 

P05B1 

18G0 


P05B2 

OOF2 

2178 



2179 

P05B3 

58 00 


P05B4 

0396 

2180 

P05B5 

1802 

2181 

PO 5B6 

18F0 

2182 



2183 

PG5B7 

1801 


2184 


2185 
218 6 
2187 


218 

8 

P05B8 

CO 

00 



P05B9 

20 

53 

216 

9 

PD5BA 

6 8 

26 

219 

0 

P05BB 

CO 

00 


D05BC 

43 

49 




I0T154 

•» 

I0T156 


IOT153 


IOT160 

P 

■I0T161 

I0T162 

I0T163 


rOT167 

P 


101169 


END OF TAPE 
NOT THE EOT 


FOR RECORDS 

ENA 

7 

ALS 

12 

STA* 

I0T163 

CHECK TAPE AT 

LOA- 

V02,I 

RTJ 

I0S22 

ANO- 

ONFBIT+9 

SAZ 

IOT150 

JMP» 

IOT175 

RTJ- 

{ AMONI? 

MUM 

$5C00 

ADC 

lOf 167 

ADC 

0 

HUM 

0 

NUM 

0 

JMP- 

(ADISFI 

LDA 

=xiov 

STA- 

I 

LOQ- 

V22,I 

LOA- 

12, Q 

STA- 

V36,I 

AND- 

ONEBITi-ll 

SAN 

IOT170 

LD A- 

V36,I 

AND- 

0NE8IT+9 

SAN 

I0T175 

LDA* 

I0T152 

SAP 

I0T17Q 

JHP 

IOR072 


TAPE MOTION REQUEST 
+ 1 CA 
+ 2 T 

+3 V,M,A,LU 

TAPE MOTION 


RESTORE I 

PHYS TABLE ADDRESS 
STATUS 

SAVE STATUS TEMPORARILY 

WAS AN EOF ENCOUNTERED 
YES 

CHECK ANY EOT 

SKIP IF THE EOT IS FOUN 

NO ERROR 
I/O ERROR 


D 


I0T17G 


IOI175 


3f. 

m- 


IOT230 


RTJ IOS30 CHECK ALL TAPE MOTION DOBE 

JMP* IOT175 ALL DONE 

JMP* I0T158 

JMP^ 10123 0 

COME HERF TO TYPE OUT A MESSAGE INDICATING NUMBER 
FILES/RECOROS ADVANCED 

LDA =A S 

5TA=^ IQHS8S-2 
LDA =AKI 


OF 


61^1299 


NB3Q2144 

N8302145 

N8302146 

N83Q2147 

N83G2146 

N8302149 

N83D2150 

N3302151 

N8302152 

N8302153 
N8302154 
M83D2155 
N8302156 
N8302157 
N8302158 
N8302159 
N3302160 
N8302161 
N8302162 
N3302163 
N33Q 2164 
N3302165 

N8302166 

N83021B7 

N8302168 

N8302169 

N830217Q 

N8302171 

N8302172 

N3302173 

N3302174 

N8302175 

N8302176 

N83D2177 

N8302178 

N8302179 
N8 3 02 18 0 

N83Q21B1 

N8302182 

N8302183 

N8302184 

N8302185 

N83021B6 

N8302187 

N8302188 

N03O2169 

N8302190 

N8302191 



o 


N8302192 

N8302193 

N83Q2194 

N8302195 

N8302196 

N8302197 

N8302196 

N8302199 

N83Q2200 

N8302201 

N83022D2 

N8302203 

N8302204 

N8302205 

N8302206 

N83a22Q7 

N83022G8 

N8302209 

N83G221i} 

N3302211 

M8302212 

N8302213 

N830221i* 

N83Q2215 

N8302216 

N83Q2217 

N8302218 

N8302219 

N83Q222D 

N83Q2221 

N83Q2222 

N3302223 

N83Q2224 


N3302225 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

n 
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08/19/99 


o 


D ATE^ 


O 

O 


222 5 



2226 


AAAA 

2227 


3BBB 

2228 


NNNN 

2229 




SKIPD/BACKD 
= RECS/FILE 
^NUMBER 


N83D2226 

N8302227 

N8302228 

N8302229 

N83G2230 




o 


o 


o 

o 

o 


o 


o 

o 

o 

o 


o 


o 

o 

o 


223 1 

2232 

2233 

2234 

2235 
22 3 6 
223 7 

2238 

2239 

2240 

2241 

2242 

2243 

2244 

2245 

2246 

2247 

2248 

2249 

2250 

2251 

2252 

2253 

2254 

2255 

2256 

2257 
2253 

2259 

2260 
2261 

2262 

2263 

2264 

2265 

2266 

2267 

2268 
2269 
2 27 0 

2271 

2272 

2273 


P05E9 

0 8 44 

I0T8FR 

P05EA 

612 5 


PQ5E8 

6126 


P05EC 

C109 

IOT302 

PG5ED 

AOOA 


PG5EE 

09B9 


P05EF 

0 112 


P05FO 

OA06 


P05F1 

1802 


PG5F2 

0 AOl 

’■84 

IOT30 4f 

P05F3 

OFCC 

IOT306 

PQ5F4 

680E 


P05F5 

C102 


P05F6 

680B 


P05F7 

C1G2 

W- 

IOI30 7 

P05F8 

58 0 0 


P05F9 

C2DD 


PO 5FA 

AGED 


P05FB 

0101 


P05FC 

181A 

IOT306 

FO 5F0 

54F4 

P05FE 

5C0 0 


P05FF 

0604 

P 

PG60G 

ooeo 

I0T3Q9 

P06D1 

0000 

lOTSlO 

P0602 

00 00 

I0T311 

P0603 

14EA 



COME HERE FOR THE 


STA- V37»I 
STA- y36,I 

CHECK FOR FILE OR 
LDA- V09,I 
AND- LPMASK+8 
INA -$46 
SAN IOT304 

ENA 6 
JMP^ IOT306 

FOR RECORDS 

ENA 1 

ALS 12 
STA^ I0I311 

LDA- VQ2,I 
STA'^ IOT310 


TBF^TBR 

NUMBER OF RECORDS BACKSPACED 
NUMBER OF FILES BACKSPACED 

RECORD BACKING 

SKIP FOR RECORDS 
FOR FILES 

FOR RECORDS 


CHECK TAPE AT LOAD POINT 


LDA- y02»I 
RTJ IOS22 


LU 

GET STATUS 


OF THE TAPE UNIT 


AND- 

ONEBIT+IO 

SAZ 

IOT30 8 

JMP» 

IOT320 

RFJ- 

iAMONII 

NUM 

$5CO0 

ADC 

I0T316 

ADC 

0 

NUH 

Q 

NUM 

0 


CHECK TAPE AT LOAD POINT 
NOT THE LOAD POINT 
ALL DONE 

*-0 RC tape motion CONTROL REQUEST 
+ 1 C A 
^■2 T 

=^3 y,M,A,LU 
+4 MOTION REQUEST 


JHP- (ADISP) 


N8302232 

N8302233 

N8302234 

N8302235 

N8302236 

N8302237 

N8302238 

N8302239 

N83G2240 

N8302241 

N83Q2242 

N3302243 

N8302244 

N8302245 

N8302246 

NB302247 

N3302248 

N8302249 

N830225D 

N8302251 

N8302252 

N8302253 

N8302254 

N8302255 

N8302256 

N8302257 

N8302258 

N8332259 

N8302260 

N8302261 

N83C2262 

N8302263 

N8302264 

N8302265 

N83Q2266 

N3302267 

N3302268 

N8302269 

N330227C 

N8302271 

N8302272 

N8302273 

N8302274 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


o 


o 


o 


o 
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2274 





2275 

PD6DA 

cooo 

I0T316 

LDA =xioy 


P0605 

0002 P 



2276 

PQ606 

60FF 


STA- 1 

2277 





2278 

P0607 

El 16 


LDQ- V22tl 

2279 

P0608 

C20C 


LDA” 12^iQ 

2280 

P0609 

6124 


STA- ;\?36,l 

2281 





2282 

P060A 

C8F6 


LOA^ IOT310 

2283 

P060B 

0126 


SAP I0T318 

2284 

P060C 

C124 


LDA- V36.I 

2285 

P060D 

A 0 20 


AMO- ONEBIT-HO 

2286 

P06QE 

01 17 


SAN IOT320 

228 7 





2288 

P060F 

0 8 FI 


LDA* IOT310 

2289 

PQ610 

1300 


UMP I0T169 


P0611 

FF9F 



229G 

P0612 

5800 

IOT318 

RTJ IOS30 


P06i3 

0337 



2291 





2292 

P0614 

1802 


JMP* IOT320 

2293 

P0615 

18E1 


UMP* IOT3Q7 

2294 





2295 





229 6 





2297 




FORMAT THE BACKED 

2298 





2299 

P0616 

COOO 

IOT320 

LDA =A 8 


PG617 

2 0 A2 



2300 

P0618 

6 8C7 


STA* I0HS8+2 

2 301 

P0619 

COOO 


LDA =AAC 


P061A 

4143 



2302 

P061R 

68C5 


STA* IOMS8+3 

2303 

P061G 

GOOD 


LDA =AK0 


P061D 

4B44 



2304 

P061E 

6 8 C3 


STA* I0MS844 

2305 

P061F 

1800 


JMP I0T235 


P0620 

FFAG 



2306 





2308 





2309 




FOR TAPE UNLOAD 

2310 



3f- 

608,609 -WILL 

2311 




601- -WILL 

2312 





2313 

P0621 

0A04 

lOTUL 

ENA 4 

2314 

P0622 

1808 


JMP* IOT400 


DATES 08/19/99 


RESTORE I 


SA¥E STATUS 
CHECK ERRORS 


CHECK ALL MOTION DONE 

ALL DONE 

NOT DONE, LOOP 

TAPE MESSAGE 


BE UN-LOADEO 

BE REWOUND AND POSITIONED AT LOADING POINT 
REWIND AND UNLOAD TAPE ’REQUEST 


N8302Z75 

N8302276 

N8302277 

N83Q2276 

N8302279 

N530228D 

N8302281 

N3302282 

N8302283 

N330228A 

N33Q2285 

N8302286 

N8302287 

N33Q2288 

N83Q2289 

N8302290 

N8302291 

N83Q2292 

N83Q2293 

N830229A 

N8302295 

N8302296 

N8302297 

N8302298 

N83Q2299 

N33Q2300 

N8392301 

N3302332 

N83023D3 

N83023Q4 

N8302305 

N83G2:SS6 

N33D230 7 


N83Q2309 

N83Q231S 

N8302311 

N83Q2312 

N3302313 

N8302314 

N83Q2315 




o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATE 


08/19799 


2316 



*4 



N8302317 

2317 



Jtf. 

FOR 

TAPE REWIND 

N8302318 

2318 





TAPE WILL BE AT LOADING POINT AFTER EXECUTION 

N8302319 

2319 



•r- 



N330232D 

2320 

P0623 

OA03 

lOTRE W 

ENA 

3 

N83C2321 

2321 

P0624 

1806 


JMP^ 

IOT4O0 

N3302322 

2322 






N8302323 


2324 




N83D2325 

2325 



^ FOR WRITE END OF FILE 

N83Q2326 

2326 



❖ 

N8302327 

2327 

P0 62 5 

0 A02 

I0TE3F ENA 2 

N83Q2328 

2328 

P0626 

1804 

JMP^ IOT40Q 

N3302329 

2329 




N83Q2330 


2331 







N3302332 

2332 




FOR 

SET DENSITY 


N3302333 

2333 







N8302334 

2334 

P0627 

C127 

lOTSO 

LDA- 

y39,I 

GET SET DENSITY CODE 

N8302335 

2335 

PQ628 

680C 


STA^ 

IOT408 


N8302336 

233 6 

PD629 

0 8 44 


CL'R 

A 


N8302337 

2337 







N8302338 

2338 




SET 

UP NOTION REQUEST WORD 

N8302339 

2339 







N8302340 

2340 

P0 62A 

OFCG 

IOT4DO 

ALS 

12 


N8302341 

2341 

P0628 

8809 


EOR’» 

IOT4Q8 


N8302342 

2342 

P0 62C 

6808 


STA^ 

I0T4Q8 


N8302343 

2343 

P0620 

C102 


LOA- 

y02,I 


N8302344 

2344 

P0 62E 

6305 


STA^ 

IOT406 


N8302345 

23 4 5 







N8302346 

2346 

P062F 

54F4 


RTJ- 

CANONI? 


N83Q2347 

2347 

P0630 

5C0D 


NUM 

$5COO 

«-0 RC TAPE MOTION REQ 

N3302348 

2348 

P0 631 

0 636 

P 

ADC 

I0T415 

+ 1 CA 

N8302349 

2349 

P0632 

0000 

IOI405 

ADC 

0 

+ 2 T 

N330 2350 

2350 

P0633 

00 0 0 

IOT406 

NUM 

0 

+3 y,M-,A,LU 

N83D2351 

2 351 

PO 634 

0000 

IOT40 8 

NUN 

0 

♦4 MOTION REQUEST 

N83D2352 

2352 



¥ 




N8302353 

2353 

P0635 

14'EA 


JMR- 

(ADISFJ 


N8302354 

2354 







N83Q2355 

2355 

P0636 

C8FC 

I0T415 

LDA'» 

IOT406 


N8302356 

2356 

P0637 

0121 


SAP 

lOr 416 

SKIP OF NO ERROR 

N3302357 

235? 







N83Q2358 

2358 

P0638 

18 6C 


JMP^ 

IOR072 

REJECT IF IN ERROR- 

N8302359 

2359 







N83Q2360 

2360 

P0639 

1800 

I0T416 

JMP 

10130 

OTHERWISE EXIT 

N8302361 


P063A 

FA87 
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DATE: 08/19/99 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


?362 

2363 

2364 

2365 

2366 

2367 

2368 

2369 
237G 

2371 

2372 

2373 

2374 

2375 

2376 

2377 

2378 

2379 

2380 

2381 

2362 

2363 
238i* 
2365 

2386 

2387 

2388 

2389 

2390 

2391 

2392 

2393 

2394 

2395 

2396 

2397 

2398 

2399 
240 0 

2401 

2402 

2403 
240 4 
240 5 
240 6 
240 7 
240 8 

2409 

2410 

2411 


P063B 0000 


P063C 
P063D 
P0 63E 
P063F 
P0640 
PO 641 
PC 642 
P0543 
P0644 
P0645 
P0646 
P0647 
P0648 
P0 649 
P064A 
PQ64B 
P064C 
PG64D 
PO 64E 
P064F 


C128 
0118 
C800 
0193 
0101 
180F 
D800 
018F 
5800 
0176 
C103 
610C 
C109 
AOOA 
0 9 ED 
0114 
CIOC 
E119 
410C 
6119 


P0650 C12B 
P0651 0101 
P0652 18 5F 


P0653 
P0654 
P0 655 
P0656 
P0657 


08 44 
6125 
612 6 

6134 

6135 


¥■ 

«■ 

'# 

¥ 

lORTJ ADC 0 

V- 

9 - 
» 

9 
9 
-9 

lOR 


ENTRY AT lORTJ WHEN THE DATA READ FROM U1 WAS NOT WRITTEN 
TO THE SCRATCH AREA. 


INITIALIZE FOR OUTPUT 
GET THE OUTPUT DEVICE LU 


GET THE LU OF THE SPECIFIED OUTPUT DEVICE. 
THE REOUEST 


2ND PARAMETER. OF 


LDA- V40,I 
SAN lORX 
LDA I0S34X 


SAZ lORTAG 
JMP» lORDlA 
lORTAG RAO I0S34X 


RTJ I0S34 


lORX 


LDA- 

STA- 

LOA- 

AND- 

INA 

SAN 

LDA- 

LDQ- 

STQ- 

STA- 


V03,I 

V12.I 

V09,I 

LPMASK»-8 

-S42 

lOROlA 

V12,I 

V25,I 

V12tl 

V25.I 


SKIP IF VERIFY 


CHECK MADE ONCE 
YES 

NO-, FIRST TIME 

CHECK FOR SAME UNITS 

SECOND UNIT 

SAVE IT TEMPORARILI 


SKIP NOT A B REQUEST 


SET TO PRINT THEN PUNCH 


N8302363 

N8502364 

N8302365 

N8302366 

N8302367 

N8302368 

N83D2369 

N8302370 

N83Q2371 

N8302372 

N8302373 

N8302374 

N6302375 

N8302376 

N8302377 

N83Q2378 

N8302379 

N8302380 

N83G2381 

N8502382 


63»1383 N3302383 


63«^1383 

63'-^1383 

63^1383 


63^1333 


CHECK WHETHER THE DATA 


WRITTEN ON SCRATCH 




lOROl A 


lOROlO 


LOA- 

SAZ 

JHP* 


V43,I 

lOROlO 

I0R74A 


SKIP IF DATA WAS WRITTEN 
OTHERWISE JUMP 


CLEAR THE FILES COUNT 


RESET THE NUMBER OF RECORDS READ SO FAR 
CLR A 

STA- ¥37,1 
STA- V38,I 
STA- V37Q, I 
STA- ¥53, I 

INITIALIZE TO READ THE DATA STORED IN THE SCRATCH AREA OF 
THE SCRATCH UNIT l$B3= ADDRESS OF THE SCRATCH UNIT) 

EACH BLOCK OF BATA IS PRECEDED BY A CONTROL BUFFER BLOCK 
OF 96 WORD SUCH THAT EACH WORD OF THE CONTROL BUFFER lOICA T£S 
THE MODE, NUMBER OF WORDS IN THE DATA BLOCK CORRESPONDING TO 


N6302384 
N8302385 
N8302386 
N83023S7 
N83Q2388 
N8302389 
N8302390 
N83G2391 
N83Q2392 
N8302393 
N8302394 
N8302395 
N3302396 
N8302397 
N83Q2396 
N8302399 
N8302400 
N8302 401 
N8302 402 
N8302403 
N83B2404 
N8302405 
N8302406 
N83Q2407 
N83Q24D 8 
N8302409 
N8302410 
N83Q2411 
N8302412 


u 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 
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date: 08/19/99 


2 412 




THIS WORD. 


2413 




^ THE END OF THE INPUT DATA IS INDICATED BY THE WORD $5555 IN 

241 4 




^ THE WORD FOLLOWING 

THE LAST DATA WORD IN THE CONTROL BUFFER. 

2415 




^ THIS ENO MARKER COULD BE ALSO THE FIRST WORD IF THE .PRECEDING 

241 6 




, CONTROL BUFFER WAS 

FULL. 

2417 




V- 


2418 




^ SET UP TO GET THE 

FIRST CONTROL BUFFER. 

2419 






2420 

P0658 

C137 


LDA- '7DBL, I 


2421 

PD659 

680A 


STA-*^ lORI 


2422 

P065A 

CllA 


LDA- V26il 

START SCRATCH ADDRESS 

2423 

P065B 

611C 


STA- \728,I 

SCRATCH ADDRESS FOR CURRENT CONTROL BUFFER 

2424 

PC65C 

6809 


IOR015 STA^^ lORD 


2425 






2426 




READ THE CONTROL BUFFER INTO I0BUF3 

2427 




» 


2428 

P065O 

54F4 


IOR020 RIJ- lAHONIJ 


2429 

P0 65E 

4800 


NUM $4800 

+0 FREAD 

2430 

P 0 6 5 F 

0667 

P 

ADC IOR030 

+ 1 CA 

2431 

P066 0 

0 0 00 


lORB ADC 0 

+2 THREAD 

2432 

P0661 

0883 


lORC NUM $0383 

H-3 V»M,A,LU 

2433 

P0662 

0 0 60 


NUM 96 

+4 NO OF WORDS TO BE READ 

2434 

P0663 

00 00 


lORI ADC 0 

+5 START ADDRESS 

2435 

PQ664 

0 0 0 0 


NUM 0 

■3-6 MSB 

2436 

P0665 

00 0 0 


lORD MUM 0 

•+7 LSB 

243 7 






243 8 

P0666 

14EA 


JMP- JADISF3 


2439 




# ABORT IF ANY READ 

ERROR 

2440 




♦ 


2441 

P0667 

G8F9 


IORD30- LDA^ lORC 


2442 

PQ668 

0122 


SAP IOR035 

SKIP NO READ ERROR 

2443 

P0669 

C0B3 


LDA- $B3 

LU 

2444 

F066A 

183A 


JHP» IOR072 


2445 

P3&6B 

COCO 


IOR035 LDA =XIOY 

RESTORE I 


P066C 

00 02 

P 



2446 

P0 66O 

60FF 


STA- I 


2^47 

P066E 

08 42 


CLR Q 

RESET INDEX TO CONTROL WORD =0 

244 8 

PQ66F 

411E 


■ STQ- V30,I 


2449 






2450 




*• CHECK IF all data 

ALREADY WAS OUTPUT 

2451 






2452 

PC670 

CCF2 


LDA'» ilORI) 


2453 






2454 




* GET THE CONTROL WORD ASSOCIATED WITH THE DATA BLOCK 

2455 




INDEX TO CURRENT ENTRY = V30 

2456 

2457 






PO 671 

6124 


STA- V36,I 

CHECK EOF 

2458 

P0 672 

BDOO 


EOR =N$5554 


P0673 

t?554 



SKIP IF EOF 

2459 

P0674 

0101 


SAZ IOR35A 

2460 

P0675 

180F 


JMP» IOR036 

NO EOF 

2461 




* 


2462 

PC676 

C128 


I0R35A LDA- i740,I 



N8302iil3 
N830 2 Alif 
M83D2A15 
N8302A16 
N8302417 
N33Q 2 A18 
N83Q2A19 
N83Q242D 
N83Q2421 
N33D2422 
N83C2423 
N8302424 
N83Q2425 
N8302426 
N8302427 
N8302426 
N83C2429 
N8302430 
N8302431 
N8302432 
N83Q2433 
M33C2434 
N83 02435 
N8302436 
M3302437 
N83Q2438 
N33D2439 
N83Q2440 
N3302441 
N8302442 
N8302443 
N8302444 
N3302445 
N8302446 

N8302447 
M3302448 
N83Q2449 
N8302450 
N83Q2 A51 
N3302452 
N8302453 
N8302454 
M8302h55 
N8302456 
N8302457 
N8302458 
N8302459 

N83Q2460 
N8302 461 
N8302462 
N3302463 
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DATES 08/19/99 


2463 

2464 

2465 

2466 

2467 

2468 

2469 

2470 

2471 

2472 

2473 

2474 

2475 

2476 

2477 

2478 

2479 

2480 

2481 

248 2 

2483 

2484 

2485 

2486 

2487 

2488 

2489 

2490 

2491 

2492 

2493 

2494 

249 5 

2496 

2497 

2498 

2499 

2500 

2501 

2502 

2503 

2504 
25C5 

2506 

2507 

250 8 

2509 

2510 


P0677 

0103 


SA7 

I0R35B 

P0678 

D135 


RAO- 

V53,I 

P0679 

1800 


JMP 

IOR200 

P067A 

0159 




P067B 

0 8 44 

I0R35B 

CLR 

A 

P067C 

6135 


STA- 

V53,I 

PD67D 

5800 


RT J 

I OS 42 

P0 67F 

03C6 




P067F 

D126 


RAO- 

V38 , I 

P0680 

5800 


RTJ 

IOS3 

P0 681 

FD45 




PO 682 

18 00 


JMP 

I0R12Q 

P0683 

0 0 AB 




P0684 

0 9FE 

IORD36 

INA 

-1 

PC685 

0113 


SAN 

IORD40 

P0686 

D135 


RAQ- 

V53,I 

PQ687 

1800 


JMP 

IOR131 

P0688 

00C9 





SKIP IF NOT A VERIFY REQUEST 
SET EOF FLAG ON FIRST INPUT 

RESET EOF FLAG 


63-1385 


BUMP NBR OF FILES 
BUMP NBR OF REGS 


CHECK END 00 INPUT DATA =N$5555 
NOT THE END OF DATA 

SET EOF FLAG ON FIRST INPUT IVXXl SS’^ISSS 
YFS 


PC689 one 
P068A cue 
P0688 6811 


P066C 
P068D 
P068E 
P066F 
P069Q 
P0691 
PO 692 
P0 693 


PO 694 
P0695 
P0696 
P0697 
PG698 
P0699 
P0 5 9A 
P069B 
P069C 


C124 

ocoo 

0121 

E02F 

411F 

AOll 

6807 

6121 


5 4F4 
4800 
0 6 9E 
GOOD 
0 8B3 
00 00 
0 AA9 
0000 
00 00 


■-> 


INITIALIZE rO READ THE DATA CORRESPONDING TO THE ENTRY 
WORD IN THE CONTROL BUFFER 


IOR040 

IOR042 


¥ 


BUMP SCRATCH ADDRESS FOR DATA 
iSB ADDRESS FOR DATA READ 
GET THE MODE AMD NUMBER OF WORDS FOR THE CURRENT DATA BLOCK 


RAO- V23,I 
LDA- V28,I 
lORH 


P 


P 



LDA- 

ENQ 

V36,I 

0 




SAP 

IOR050 

BINARY MODE 

IOR050 

LOO- 

STQ- 

ONEBITiH2 
V31, I 

ASCII MODE 

AND- 

LPMASKH5 

CA) 

= CONTROL WORD 

IOR06 0 

STA^ 

STA- 

lORG 
V33 •» I 

NO 

OF WORDS TO BE 

RFAD 

RTJ- 

THE DATA 
(AHONI) 

BLOCK 

FREAD 

NUM 

$4800 

Q 


ADC 

IOR070 

+ 1 

CA 

lORE 

ADC 

0 


THREAD 

lORF 

NUH 

$0803 


V»M,A,LU 

lORG 

NUM 

0 

+4 

NO OF WORDS TO 

ADC 

I0BUF2 

*•5 

START ADDRESS 


NUM 

0 

*t-6 

MSB 

lORH 

ADC 

0 

+ 7 

LS8 


63^1385 


BE READ 


N8302464 
N8302 465 
N8302466 

N8302467 
N8302 468 
N8302469 

N83Q2470 

N8302471 

N8302472 

N8302473 

N8SQ2474 

N8302475 

N 33 02 47 6 
N8302477 
N8302478 
N8302479 
N83Q248C 

N83u2431 
N8302482 
N8302483 
N83 0 2 48 4 
N8302485 
N8302486 
N8302487 
N8302488 
N8302489 
N330249G 
N8302491 
N83Q2492 
N8302493 
N83Q2494 
N8302495 
N8302496 
N8302497 
N8302498 
N8302499 
N83025Q0 
N8302501 
N8302502 
N8302503 
N8302504 
N8302505 
N8302506 
N8302507 
N830 2 5Q8 
N83D25Q9 
N83D2510 
N8302511 
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2511 




2512 

P069Q 

14EA 


2513 




2514 

P069E 

CO 00 

IORfl70 


P069F 

0002 P 


2515 

P06AO 

6QFF 


2516 



•ajt- 

2517 




2518 




2519 

PD6A1 

C8F6 


2520 

P06A2 

012G 


2521 




2522 

P0 6A3 

CO B3 


2523 

PQ6A4 

AOOD 

IORO'72 

2524 

PD6A5 

E800 



PG6A6 

FA 90 


2525 

P06A7 

5800 



PQ6A8 

0208 


2526 



# 

2527 

P05A9 

C128 


2528 

P06AA 

0102 


2529 

P06AB 

1800 



P06AC 

0162 


2530 




2531 

PQ6AD 

1800 

IOR073 


PO 6AE 

FA13 


2532 




2533 



# 

2534 

PG6AF 

5300 

IOR074 


P06B0 

FD16 


2535 




2536 




2537 




2538 

P06B1 

C128 

IOR74A 

2539 

PG6B2 

0102 


2540 

P06B3 

180 0 



PQ6B4 

OilF 


2541 




2542 




2543 

PQ6B5 

C135 

IOR075 

2544 

P06B6 

0105 


2545 



¥ 

2546 

P06B7 

0844 


2547 

P0 6B8 

6135 


2548 

P06B9 

5800 



PG6BA 

0 3 8A 


2549 




2550 

PO6B0 

1 8 73 


2551 




2552 

P06BC 

CIOC 

IOR75A 

2553 




2554 

PD680 

BllF 


2555 

PD6BE 

68 43 



JMP- 

(ADISP? 


LDA 

= XIOV 

RESTORE 

STA- 

I 


CHECK 

: ANY ERRORS 


LDA’*^ 

lORF 


SAP 

IOR074 

NO ERROR 

SEND 

THE I/O ERROR 

MESSAHE 

LDA- 

SB3 

LU 


AND- LPHASKUl 
LDQ IOMS7L 

RTJ IOS35 

CHECK PROCESSING A VXX RREQUESI 
LDA- VAD,I „ 

SAZ IOR0.73 NOT A VXX RtOUEST 

JMP I0R225 

JHP 10130 SOLICIT NEXT lOUP REQUEST 

RTJ loss BUHP NBR OF REGS 

CHECK WHEFHER PROCESSINF A ¥XX REQUEST 
LDA- ¥40,1 

SAZ IOR075 NOT A VXX REQUEST 

JMP IOR200 PROCESS THE VXX REQUEST 

SET UP TO OUTPUT THE DATA OF I0BUF2 TO THE SPECIFIEO DEVICE. 


LQA- V53.I 
SAZ IOR75A 

SKIP IF NO EOF 

ON INPUT 

CL R A 
STA- V53,I 
RTJ I0S42 

RESFT EOF FLAG 
OTHERWISE WRIT 

EOF 

JMP» IOR120 



LOA- V12»I 

tu 


EOR- V31 ,I 
STA^ lORK 

PLUS THE MODE 

OF DATA 


N8302512 

N3302513 

N8302514 

N8302515 

N8302516 

N8S02517 

N8302516 

N8302519 

N83B252C 

N83B2521 

N83D2522 

N8302523 

N83Q2524 

N83D2525 

N8302526 

N83i2527 

NS302528 

N8302529 

N3302530 

N3302531 

N83Q2532 

N8302533 

N63Q2534 

N8302535 

N830 2 536 
N8302537 
N830 2 538 
N8302539 
N8302540 
N83D2541 


N830 

N830 

N830 

N83Q 

N330 

N830 

N83Q 

N830 

N830 

N830 

N830 

N83Q 

N830 

N83D 

N830 


2542 
2 543 
2 544 

2545 

2546 
2 547 

2548 

2549 

2550 
2 551 

2552 

2553 
2 554 
2 555 
2556 


o 









o 
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c 

2556 

P06BF 

C136 


LDA- VABUF,I 


N8302557 


□ 


255? 

P06C0 

6 8 43 


STA- lORH 


N8302558 




2558 

P06C1 

C12B 


LDA- V43,I 

CHECK DATA WAS WRITTEN TO SCRATCH 

N8302559 



o 

2559 

P06C2 

0 104 


SAZ 109076 

SKIP IF WRITTEN 

N83Q2560 


o 

2560 

P06C3 

C121 


LDA- V33,I 

NER OF WORDS TO BE OUTPUT 

N8302561 



2561 

P0 6C4 

6 83E 


STA-^ lORL 


N8302562 




2562 

P06C5 

6603 


STA» lORG 


N83Q2563 



o 

2563 

P06C6 

1809 


JMP» I0R76 


N8302564 


o 

2564 



’■y 



N3302565 



2565 

P06C7 

C8D1 

IOR076 

LDA» lORG 

NBR OF WORDS READ EARLIER 

N83D2566 




2556 

P0 6C8 

633A 


STA'^ lORL 


N83Q2567 



o 

2567 

P06C9 

0 8 42 


CLR Q 

BUMP SCRATCH ADDRESS 

N3302568 


l'“'\ 

2568 

P06CA 

3 8 97 


OVI» IORCH-1 

FOR NEXT WRITE 

N8302569 


C-' 

1 

2569 

PD6CB 

01 41 


SQZ 1 


N83Q257a 




2570 

P06CC 

0901 


INA 1 


N8302 571 



o 

2571 

P06C0 

811C 


AOD- V28,I 


N6302572 


o 

2572 

P06CE 

61 1C 


STA- \728 ,I 


M3302573 



2573 






N3302574 




Z57h 




CHECK IF OUTPUT 

TO CARO PUNCH 

N83G2575 



o , 

2575 

2576 

P06CF 

C109 

I0R76 

LDA- V09,,I 
AND- LP^3ASK+8 

REQUEST CODE 

N8302576 

N3302577 


o 


2577 

P06D0 

AOOA 



N8302578 




2578 

P06D1 

0 9BC 


INA -$43 


N8302579 




2579 

P06D2 

0113 


SAN I0R77 

SKIP IF NOT A CARD PUNCH 

NS302580 


o 


2580 

PQ6D3 

58 0 0 

I0R76A 

RTJ I0S27 


N8302581 




P06D4 

0 2 5A 







2581 

P06D5 

1859 


JM'P^ I OR 12 0 


N8302582 



o 

2582 



n- 



N8302583 


o 

2533 




CHECK OUTPUT TO 

PRINTERi GHARCTER 8 V25 NZERO 

N8302584 



2584 






N83Q2585 




2585 

P06D6 

C119 

I0R77 

LOA- V25»I 


N8302586 



o 

2586 

P06O7 

0115 


SAN I0R77B 

SKIP IF 8 CHARACTER 

N8302587 


o 

258 7 






N8302588 



2588 

P06D8 

C109 

I0R77A 

LDA- yog, I 


N8302589 




2589 

P06O9 

AC 0 A 


AND- LPMASK^^8 


N8302590 



o 

2590 

P06DA 

0 9 83 


INA -$4C 


N83Q2591 


o 

2591 

P060B 

0101 


SAZ I0R77B 

FOR PRINTER L 

N8302592 



2592 

P06DC 

161D 


JHPi^ I0R7 7E 


N8302593 




2593 

P05OD 

C8BR 

I0R77B 

LDA^^ lORG 


N8302594 



o 

2594 

P06OE 

6110 


STA- \/16,I 


N8302595 


o 

25 9 5 






N8302596 



2596 




CHFCK FOR FORTRAN LINE PRINTER 

N8302597 




2597 






N8302598 



o 

2598 

P06DF 

EiOC 


LDO- V12,I 

PICK UP PHYST8 

N8302599 


o 

2599 

PO6E0 

EE 0 0 


LDQ IALOGlA),a 

A DDR OF LINE PRINTER 

N630260C 




PQ6E1 

FCDO 






2600 

P06E2 

C213 


LDA- 19, Q 

FORTRAN L.P. LU 

N83Q2601 



o 

2601 

P06E3 

910C 


SUB- \/12,I 

IS THIS A FORTRAN PRINTER 

N8302602 


o 

2602 

P06E4 

0101 


SAZ 1 

YES 

N83026G3 



2603 

P06E5 

6127 


STA- \f39,I 

NO, DONT AOD WORD FOR CARRIAGE CONTROL 

N8302604 




260 4 






N3302605 



O 

2605 




CHECK FOR 1ST CHARACTER TO BE CARRIAGE CONTROL FUNCTION 

N8302606 


o 

2606 



If- 



N83Q2607 


o 









o 

n 









o 

— 

— 

— 

— 






, - 



1 
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2607 

P06E6 

C127 



LDA- 

V39,I 


N83026Q8 

260 8 

P06E7 

0113 



SAN 

I0R77M 

SKIP FOR CARRIAGE CONTROL 

N8302609 

260 9 

P06E8 

C81B 



LDA^ 

lORH 


N83D261D 

2610 

P06E9 

09FE 



INA 

-1 


N8302611 

2611 

P06EA 

6819 



STA^ 

lORM 

START AODERSS 

N8302612 

2612 




V- 




N8302613 

2613 

P0 6F8 

C8AD 


IOR77 M 

LOA*^ 

lORG 


N8382614 

2614 

P06EC 

09BC 



INA 

-LINLEN 


N8302&15 

2615 

PG6ED 

0123 



SAP 

IOR77C 


N8302616 

2616 

P06EE 

Clio 



LDA- 

V16,I 


N8302617 

2617 

P06EF 

6 813 



SIA^ 

lORL 


N8302618 

261 8 

P06F0 

18C6 



■JHP» 

I0R77D 


Na3S2619 

2619 

P05F1 

0 A43 


I0R77C 

ENA 

LINLEN 


N8302620 

2620 

P06F2 

E127 



LDQ- 

V39,I 


N83Q2621 

2621 

P06F3 

01 51 



SQN 

I0R77P 

SKIP FOR CARRIAGE CONTROL 

N8302622 

2 62 2 

P06F4 

0901 



INA 

1 


N8302 623 

2623 

P06F5 

6800 


■I0R77P 

STA^ 

lORL 


N8302824 

2624 

P06F6 

Clio 


I0R77D 

LDA- 

V16,I 


N33B2625 

2 62 5 

P0 6F7 

0 9BC 



INA 

-LINLEN 


N83D2626 

2626 

P06F8 

6110 



STA- 

yi6,i 


N8302627 

2627 

P06F9 

OAOl 


I0R77E 

ENA 

1 

GET REQUEST CODE 

N83D2626 

2626 

P06FA 

58C0 



RTJ 

I0S38 


H8302629 


P06FB 

0 2B9 







2629 

P06FC 

68 02 



STA« 

IOR78 


M8 30 2 630 

253 0 








N8302631 

2531 

P0 6FD 

54F4 



RTJ- 

tANONI) 


N8302632 

2632 

P06FE 

00 00 


I0R78 

NUH 

0 

+0 RC REQUEST CODE 

N8302633 

2633 

P06FF 

0705 

p 


ADC 

IOR090 

CA 

N8302634 

2634 

P0700 

■00 0 0 


lORJ 

ADC 

0 

+2 THREAD 

N8302635 

2635 

P0701 

00 0 0 


lORK 

NUH 

3 

^3 y,M,A,LU 

N83D2636 

2636 

P07O2 

0000 


lORL 

NUN 

0 

+4 NO OF WORDS 

N8302637 

2637 

P0703 

0AA9 

P 

■lORM 

AOC 

I0BUF2 

-►5 START ADDRESS 

N8302638 

2638 




#■ 




N8302639 

2639 

P0 7O4 

14FA 



JMP- 

{AOIS-Pl 


N8302640 

2640 








N8302641 

2641 





CHECK ANY WRITE 

ERRORS 

N8302642 

2642 








N8302643 

2643 

PD705 

C8FB 


IOR09Q 

LOA» 

lORK 


N8302644 

2644 

P0706 

0121 



SAP 

IOR095 

NO ERROR SKIP 

N8302645 

2645 

P0707 

18 9C 



JMP^ 

I0RG72 

•READ ERROR. REJECT 

N8302646 

2646 

P0708 

CDGO 


IOR095 

LDA 

= XIOV 

• RESTORE I 

N8302647 


P07Q9 

00 02 

P 






2 64 7 

P070A 

6 OFF 



STA- 

I 


N83D2648 

2648 








N3302649 

2649 








N8302650 

2650 

P07QB 

C109 



LDA- 

W09»I 

■ CHECK OUTPUT TO PRINTER 

MS302651 

2651 

P070C 

AO OA 



AND- 

LPMASK»-8 


N8382652 

2652 

P070D 

09BQ 



INA 

-$42 


N8302 653 

2653 

P07GE 

0111 



SAN 

IOR096 

NOT A B 

N8302654 

2654 

P070F 

1806 



JHP’^ 

IOR097 


N8302655 

2655 

P0710 

G1Q9 


IOR096 

LDA- 

V09jl 


N83Q2656 

2656 

P0711 

AO OA 



ANO- 

LPMASK*-8 


N83D2657 

2657 

P0712 

0 9B3 



INA 

-f4C 


N8302658 
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o 

2658 

P0713 

0101 


SAZ I0R097 

FOR PRINTER 

N8302659 

o 


2659 

P0714 

1814 


JMP^ I0R99A 


N83D2660 



2660 






N8302661 


o 

2661 

P0715 

C8FD 

IOR097 

LDA'^ lORM 

FOR PRINTER OUTPUT 

N8302662 

o 

2662 

P0716 

0 9 43 


INA LINLEN 


N83G2663 


2663 

P0717 

68FB 


STA’^ lORM 


N8302664 



2664 

P0718 

C127 


LDA” ¥39il 

CHECK FOR CARRIAGE CONTROL 

N8302665 


o 

2 66 5 

P0719 

0113 


SAN I0R97G 

SKIP IF YES 

N8302666 

■ o 

2666 

P071A 

COOO 


LDA =N$2020 


N8302667 



P071B 

20 20 







2 66 7 

P071C 

6CE6 


STA* (lORHI) 


N8302568 


o ^ 

2658 

P071D 

Clio 

I0R97C 

LQA- V16tl 


N8302669 

o 

2669 

P071E 

0101 


SAZ I0R97A 


N8302670 


2670 

PG71F 

0121 


SAP IOR098 


N8302671 



2671 

P0720 

1808 

IOR97A 

3MP* I0R99A 


N8302672 


o 

2672 

P0721 

Clio 

IOR098 

LOA- \716,I 


N8302673 

o 

2673 

P0722 

09GC 


INA -LINLEN 


N8302674 


2674 

P0723 

0123 


SAP I0RQ99 


N8302675 



2675 

P0724 

Clio 


LBA- V16,I 


N83D2676 


o 

2676 

P0725 

68DC 


STA» lORL 


N8302677 

o 

267 7 

P0726 

18CF 


JHP^ I0R770 


N8302678 


2678 

P0727 

18 eg 

TOR099 

JMP» IOR77C 


N8302579 



2679 




CHECK IF OUTPUT IS 

REQUIRED FOR A 2ND LU (REQ CODE MB/PBl 

N3302680 


o 

268D 





N83Q2681 

■ o 

2681 

P0728 

C119 

IOR99A 

LOA- V25,I 


N8302682 


2682 

P0729 

0111 


SAN lORlDO 

SKIP IF CHAR B. Y25=LU FOR PUNCH 

N83D2683 



2663 

PC72A 

1804 


JHP* IOR120 


N8302684 


o 

2684 






N8302685 

■ o 

2685 




SET UP TO OUTPUT TO ANOT HER UNIT (LU IS 3RD PARAHETER? 

N8302686 


2686 






N8302687 



2687 

P072B 

BllF 

lORlOO 

EOR- V31,I 

MODE 

N8302688 


o 

2688 

P0 72C 

6804 


STA» lORK 


N83D2689 

o 

2689 

P072D 

16A5 


JHP^ IOR76A 

TO PUNCH CARDS (U3=3 

N8302690 


2690 






N83Q2691 



2691 






N8302692 


o 

2692 

P O 72 E 

CO 00 

IOR120 

LDA "XlOy 

RESTORE I- 

N8302693 

; O 


P072F 

00G2 P 






2693 

PG73Q 

60FF 


STA- I 


NS302694 



2694 

P0731 

OAOO 


ENA 3 


N8302695 


o 

2695 

P0732 

61 35 


STA- ^53,1 

CLEAR EOF FLAG 

N8302696 

o 

2696 






N8302697 


2697 

P0733 

C12B 


LOA- 1/43,1 

CHECK IF SCRATCH HAS USED FOR DATA XFER 

N8302698 



2698 

P0 734 

0105 


SAZ I0R122 

SKIP IF SCRATCH USED 

N8302699 


o 

2699 




RESTORE REA3 BUFFER ADDRESS TO I08UF2 

N830270C 

■ o 

270Q 



¥ 



N8302701 


2701 

P0735 

C136 


LOA- VABUF,I 


N830 2782 



2702 

P0736 

6800 


STA 10520 K-+1 


N3302703 


o 


P0737 

0177 





o 

2703 

P0738 

1C 0 0 


JHP flORFJ) 

OTHERWISE EXIT TO READ NEXT DATA, 

N8302704 



PD739 

FFOl 







2704 




BUMP TO NEXT ENTRY 

IN CONTROL BUFFER. 

N83027D5 


o 

2705 






N83Q2706 

' o 

2706 

PD73A 

DUE 

I0R122 

RAO- V30,I 


N8302707 


O 


o 
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27G7 

PQ73B 

EllE 


LDQ- 

V30 ,I 

CHECK FOR END OF CONTROL BUFFER DATA 


N83G2708 

270 3 

P073C 

0D9E 


INQ 

-96 



N8302709 

2709 

P073D 

0148 


SQZ 

BMPSCT 



N8302710 

2710 

P073E 

0060 


INQ 

96 



N8302711 

2711 

P073F 

E137 


ADQ- 

VDBL, I 



N8302712 

2712 

P0740 

C622 


LDA- 

(ZERO ) , Q 



N8302713 

2713 

P0741 

6124 


STA- 

^36,1 

SAVE CONTROL WORO 


N830 2714 

2714 



- ^ 





N83Q2715 

2715 




■CHECK IF THE 

END OF FILE ON THE INPUT DATA 


N8302716 

2716 



¥ 





N8302717 

2717 

PO 742 

BO 00 

IOR105 

EOR 

=NS5554 



N8302718 


P0743 

5554 







2718 

P0744 

0108 


SAZ 

I0R13X 

SKIP IF EOF 

63'»1385 

N83Q2719 

2719 



# 





N830272D 

2720 

PO 745 

0 9EE 


INA 

-1 

CHECK END OF DATA =N$5555 


N8302721 

2721 

P0746 

0109 


SAZ 

I0R13X 

SKIP IF END OF DATA 

63*^1385 

N03O2722 

2722 



, ^ 





N8302723 

2723 

P0747 

0D9E 


INQ 

-96 



N83Q2724 

2724 

P0748 

01 55 


SQN 

IOR130 

SKIP IF NOT END OF CONTROL BLOCK 


N8302725 

2725 

P0749 

0 8 44 

BMPSCT 

CLR 

A 

SET UP TO READ NEXT CONTROL BUFFER 


N8302726 

2726 

P074A 

611E 


STA- 

V30 ,I 

INDEX TO CONTROL BUFFER 


N83Q2.727 

272 7 

P0748 

Cl 1C 


LDA- 

V28,I 



N83Q2728 

272 8 

P0 74C 

1800 


JHP 

IOR015 



N83Q2729 


P0 74D 

FFOE 







2729 








N8302730 

273 0 




OTHERWISE JUMP TO READ THE NEXT DATA BUFFER. 


N 83 a 2 731 

2731 








N8302732 

2732 

P074E 

18 DO 

IOR130 

JMP 

IOR042 



N8302733 


P074E 

FF3A 







2737 



if 




63^1385 

N8302734 

2734 






SET V53 FLAG FOR END OF INPUT 

63->1385 

N8302735 

2735 







63^1385 

N83Q2736 

2736 

PQ750 

0135 

I0R13X 

RAO- 

V53,I 

END OF INPUT 

63=5^1385 

N8302737 

2737 








N83D2738 

273 8 




CHECK FOR VXX 

REQUEST 


N8302739 

273 9 








N8302740 

2740 

P0751 

C128 

I0R131 

LDA- 

V4Q,I 



N8302741 

2741 

PQ752 

0104 


SAZ 

I0R132 

NOT A VXX REQUEST 


N8302742 

2742 

P0753 

5800 


RTJ 

lose 

BUMP NUMBER OF RECOROS 


N8302743 


P0754 

FC72 







2743 

PO 755 

1800 


JMP 

IOR200 

PROCESS VERIFY REQUEST 

63^1385 

N8302744 


P0756 

Q0 7D 







2744 

P0757 

5800 

I0R132 

RTJ 

IOS42 

WRITE EOF ON OUTPUT DEVICEfS) 


N8302 745 


P0758 

02EC 







2745 

P0759 

0 AOO 


ENA 

0 



N8302746 

2746 

PG75A 

6135 


STA- 

\?53,I 

CLEAR EOF FLAG 


N8302747 

2747 






3 CARDS DELETED 


N3302748 

2748 








N8302749 

2749 




CHECK IF R/F 

IS APPLICABLE 


N8302750 

2750 








N8302751 

2751 

PO 75B 

C12B 

I0R135 

LBA- 

V43 tl 



N8302752 

2752 

P075C 

0101 


SAZ 

IOR.13 8 

SKIP IF SCRATCH USED 


N8302753 

2753 

P075O 

182E 


JNP-^ 

IOR190 

EXIT 


N33Q2 754 


o 

o 

o 

o 

o 

o 

o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 


I0UPV4 


2754 

P075E 

C124 

IOR138 

LDA- V35tl 

2755 

P0 75F 

BOOO 


EOR =N$5554 


P 0 76 Q 

5554 



2756 

P0761 

0101 


SAZ I0R139 

2757 

P0762 

1809 


JMP» IOR140 

2758 

PO 763 

5800 

IOR139 

RTJ lOSA 


PD764 

FC4E 



2759 

P0765 

1802 


JMP^^ I0R13 6 

276Q 

P0766 

1803 


JMP^ I0R137 

2761 





2762 

Pfl767 

D1 26 

IOR136 

RAO- W38,I 

2763 





2764 

P0768 

18D1 


JMP» I0R122 

2 765 

P0769 

0125 

I0R137 

RAO- V37,I 

2766 

P076A 

18CF 


UMP*^ I0R122 

2767 




CHECK REPEAT 

2766 





2769 

P076B 

C128 

I0R140 

L0A- V43,I 

2770 

P076C 

0113 


SAN I0R141 

2771 

P076D 

E129 


LOQ- V08,I 

2772 

P076E 

OOFl 


INQ -14 

2773 

P076F 

0 171 


SQM I0R145 

2774 

PC770 

181B 

I0R141 

IOR190 

2775 





2776 




CHECK WHETHER 

2777 



»■ 


277 8 

P0771 

Dill 

IOR145 

RAO- V17.I 

2779 





2780 




DETERMINE THE 

2781 





2782 

P0772 

E129 


LDQ- VOS, I 

2763 

P0773 

GADO 


LDA IOT02,Q 


P.0 774 

F8E4 



2784 

P0775 

A009 


AND- LPMASK»-7 

2785 





2786 

PQ776 

EAOO 


LOQ IOT02,Q 


P0777 

F8E1 



2787 

PQ778 

0161 


SQP I0R146 

2788 

P0779 

09FE 


INA -1 

2789 





2790 

P077A 

0822 

I0R146 

TRA Q 

2791 

P077B 

CAOD 


LDA IOV01,Q 


P077C 

F886 



2792 

P0 77D 

Bill 


EOR- V17,I 

2793 

P077E 

OIGC 


SAZ I0R19D 

2794 





2 79 5 




IF OUTPUT 13 

2796 





2797 

P077F 

El 03 


LDQ- VOS, I 

2798 

P0780 

EEOO 


LDQ lALOGlA) 


P0781 

FG30 



2799 

P0782 

C208 


LDA- 8,Q 

2800 

P0783 

DF4B 


ARS 11 
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CHECK ANY EOF 
EOF MARKER 

SKIP IF EOF 
NOT THE EOF 
CHECK R/F 

FILE TRANSFER 
RECORDS TRANSFER , 

BUMP NBR OF FILES READ SO FAR 
5 CAROS DELETED 

BUMP RECORD COUNT 

SET UP TO READ SOME MORE 


CHECK WHETHER SCRATCH USED FOR DATA XFER 
SKIP IF NOT USED 

CHECK IF REPEAT COUNT APPLICABLE 

APPLICABLE.SKIP 

EXIT. 


UPDATE THE REPEAT COUNT 


REQUEST INDEX 

GET NER OF PARAMETERS IN TEQUEST 


SKIP IF OPTIONAL PARAMETER NOT APPLICABLE 
OTHERWISE DECREMENT 


REPEAT COUNT 

ALL OUTPUT DONE. EXIT 

MAG TAPE, WAIT FOR C/P BETWEEN MULTI COPIES 
OUTPUT LU 

,Q PHYSTB ADDRESS 

WORD 8 OF PHYSTB 



NS3D2755 

O 

N3302756 


N8302757 

o 

N8302758 


N3302759 


N83Q2760 

o 

N8302761 

NS302762 


NB302763 


N8302764 

o 

N8302765 

N8302766 


N8302767 


N8302768 

o 

N3302769 

N830277B 


N83Q2771 


N8302772 

o 

N83Q2773 

N8302774 


N83Q2775 


N8302776 

^ o 

N8302777 

N3302778 


N83Q2779 


N830278C 

o 

N8302781 

N8302782 


N8302783 


N8302784 

o 

N8302785 


N8302786 


N83Q2787 

: o 

N8302788 


N83G2789 


N830279G 

o 

N8S02791 


N8302792 


N83Q2793 

; o 

N8302794 

N8302 795 


N830279& 


N8302797 

o 

N83Q2798 

N8302799 


N8302800 

O 

N83028Q1 


o 


O 


I 


I0UPV4 
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DATES Q8/19/99 


o 

o 

o 

o 

o 

o 

o 

o 

o 

c 

o 

o 

o 

o 

o 

o 

o 


2801 P0784 AD05 

2802 P0785 Q9FE 

2803 PD736 0112 

2804 P0737 5300 
P0788 02F1 

2805 P0789 1300 
PD78A FEC8 

280 6 

2807 

280 8 

2809 

2810 PQ78B 5600 
P078C FC26 

2811 P078D 1805 

2812 

2813 P078E OAFE 

2814 P078F £800 
PD790 002A 

2615 PC791 1804 

2816 P0792 0 844 

2817 P0793 E8Q0 
P0794 0025 

2816 

2819 PC795 5800 
P0796 D25A 

2620 P0797 1800 
P0798 F929 

2821 

2822 P0799 4E55 
PD79A 4042 
P079B 4552 
P079C 204F 
P079D 4620 
PD79E 4649 
P079F 4C45 
P07A0 5320 
P07A1 434F 
P07A2 5049 
P07A3 45i-4 
P07A4 2020 
P07A5 204E 
PQ7A6 4E4E 
P07A7 4E4E 

2823 PQ7A8 2000 

2824 

2825 P07A9 4E42 
P07AA 5220 
P07AB 5245 
PQ7AC 4353 
P07AO 20 43 
P07AE 4F50 
P07AF 4945 
P07BQ 4420 
P07B1 4E4E 


AND- LPMASK+3 EQUIPMENT CLASS 

INA -1 

SAN I0R147 SKIP IF NOT MAG TAPE 

RTJ I0S91 OUTPUT MESSAGE AND WAIT FOR C/R 

I0R147 JHP lORQlO JUMP TO REREAD INPUT DATA 

EXIT 

TO OUTPUT THE FILE/REC COPIED MESSAFE 

IOR190 RTJ lOSA CHECK R/F APPLICABLE 

JMP» I0R194 FOR MAG.TAPE FILES TRANSFER 

I0R193 ENA -1 FOR RECS 

LDQ lOHSCL 

JMP* IOR195 

I0R194 GLR A FOR FILES 

LDQ lOHSBL 


I0R195 RTJ IOS40 SEND MESSAGE 

JMP 10130 SOLICIT THE NEXT lOUP REQUEST 


lOMSll ALF 15, NUMBER OF FILES COPIED NNNNN 


NUM $20 00 

IOMS12 ALF 15,NBR RECS COPIED NN»32768+NNNNN 


N8302802 

N3302803 

N8302804 

N8302805 

N83D2806 

N33028D7 

N8302808 

N8302809 

N8302810 

N8302311 

N8302312 

N83Q2813 

N8302814 

N3302815 

N8302816 

N8302817 

N33Q2818 

N8302819 

N8302820 

N8302821 

N8302822 

N8302823 


O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


N83G2824 

N8302825 

N8302826 



o 

o 

o 

o 

o 

o 


o 

o 

o 


o 

□ 

o 

N8302827 

N8302828 O 

N3302829 ^ 

N83C283D 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


I0UPV4 
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CHECK FOR UNIT 1 = UNIT 2 
IF SAME UNITS, OUTPUT MESSAGE AND CONTINUE ON C 


P07BB 
P078C 
PG7BD 
P07BE 
P078F 
P07CC 
P07C1 
P07C2 
P07C3 
P07C4 
P07C5 
PQ7C6 
PQ7C7 
P07C8 
P07C9 
P07CA 
P07CB 
P0 7CC 
PQ7CD 
P07CE 
P07CF 
P07D1 
P07D2 


OBOO 
CIO? 
9103 
OllA 
6800 
029F 
54F4 
4800 
07C9 
0 000 
18FD 
QOOl 
Q7CF 
14EA 
0161 
18F6 
EOOO 
00 02 
4DFF 
ICEC 
0 0 02 
0 A69 
0 0 00 


I0S34 


I0S34A 


LDA- V02,I 
sue- V03il 


I0S341 

I0S34B 


I0S343 

IOS34X 


RTJ- 

NUM 

ADC 

ADC 

NUM 

NUM 

ADC 

JMP- 

SQP 

JMP» 

LDQ 

STQ- 

JHP* 

ezs 

ADC 

NUM 


I0S341 

I0S344 

IAMONI3 

$4800 

I0S341 

0 

$18F0 

1 

I0S342 
{ADISP) 
I0S34B 
I0S34A 
= XI0W 


(I0S34J 

I0S342I2I 

I0S34M 

0 


FIRST INPUT 

SECOND INPUT OR OUTPUT 
SKIP IF NOT SAME ^ 

OUTPUT MESSAGE FOR SAME UNITS 


FREAD 

COMP 


STANDARD COMM DEV 


SKIP IF NO ERROR 
REPEAT REQUEST 


RESTORE *1' 
CONTINUE 

MESSAGE ADDRESS 


O 

O 

O 

O 

o 


o 


63^1383 

N8302832 


63^1383 

N8302833 


63»1383 

N8302834 


63»1383 

N33D2835 

O 

63»1383 

N83D2836 

63*^1383 

N8302837 


63»1383 

N8302836 

o 

63»1383 

N8302839 


N83Q2840 


63^1383 

N8302 841 

o 

63^1383 

N8302842 

63»1383 

N83D2843 

63»1383 

N8302844 


63^1383 

N83Q2845 


63*^1383 

N8302846 

o 

63^1383 

N8302847 


N8302848 

N83D2849 

N8302850 

o 

63«^1383 

N8302351 


63-*^1383 

N83G2852 

o 

63^1383 

N8302853 

63^1383 

N8302 854 

63^1383 

N3302855 



o 


o 

o 

o 

o 

c 

o 

C) 

o 


r') 


I0UPV4 
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o 

2856 



3f. 


2857 





2858 




o 

2859 




2860 





2861 





2862 




o 

2863 




2864 



w- 


2865 

P0 7D3 

C8FE 

IOR2Q0 


2366 

P07D4 

0112 


o 

2867 

PD7D5 

D8FC 


2868 

P07D6 

56E4 



2869 

P07O7 

C12B 

IOR231 


2870 

P07O8 

0106 


o 

2871 

2872 





2873 

2874 

PD709 

C121 


o 

2875 

P07DA 

6800 


2876 

PD7DB 

FEBD 




2877 

P07DC 

C120 


o 

2873 

P07OO 

6121 


2879 

2880 

P07DE 

18 09 




2881 

P07DF 

C120 

IOR2G2 

o 

2882 

P07E0 

6121 


2883 

PC7E1 

C124 



2884 

P07E2 

OCOO 



2885 

P07E3 

4123 


o 

2836 

P07E4 

0121 


2887 

P0 7E5 

EO 2F 



2388 

P07E6 

411F 

IOR2Q5 


2869 




o 

2890 

P07E7 

C138 

IOR206 

2891 

P07E8 

6800 




PQ7E9 

G0C5 



2892 

P07EA 

GAOO 


o 

2893 

P07EB 

5800 



PG7EC 

01C8 



2894 

P07ED 

6805 



2695 

P0 7EE 

68 5 E 


o 

2896 

2897 

P07EF 

El 03 



2898 





2899 




o 

290 0 




2901 

P07FQ 

5800 

IOR2iO 



P07F1 

0QB4 



2902 

P07F2 

00 00 

I0R212 

o 

2903 

2904 

PQ7F3 

1804 



COME HERE TO PROCESS A VERIFY REQUEST 

THE DATA TO BE COMPARED WITN IS IN lOBUFE 
THE NUMBER OF WORDS IN THIS BUFFER IS IN lORG 
THE MODE OF DATA IN THIS BIFFER IS B15 OF V36 

SET UP TO READ THE SECOND DATA 

LDA» I0S34X 

SAN IOR201 CHECK MADE ONCE 

RAO=»^ I0S34X FIRST TIME 

RTJ^ 10334 CHECK FOR SAME UNITS 

LDA- V43,I CHECK IF SCRATCH USED 

SAZ IOR202 SKIP IF USED 

INITIALIZE FOR READ OF 2ND INPUT 


63^^1383 

63^1383 

63^1383 

63=^1383 

63*^1383 


IF NOT USED 


LDA- V33,I 
SIA lORG 


LDA- V32tl 
STA- V33,I 
JMP» IOR206 

LDA- V32,I 
STA- V33,I 
LDA- V36,I 
ENO 0 
STQ- V35,I 
SAP IOR205 
LDQ- 0NEBITH2 
STQ- V31,I 

LDA- VVBUFtl 
STA IOS20K4-1 


SAVE NBR OF WORDS READ FROM FIRST INPUT 


ENA 

RTJ 


0 

I OS 3 8 


MODE OF READ 

START BUFFER ADDRESS 
SKIP IF BINARY' MODE 
FOR ASCII MODE 


GET THE REQUEST CODE FOR INPUT 


STA^ I0R212 
STA^ I0R235 


2N13 INPUT LU 
THE INPUT DEVICE 
I OS 2 0 

NUM 0 *0 REQUEST CODE 

JMP» I0R215 FOR ERROR RETURN 


LDQ- V03,I 
READ 
RTJ 


N8302857 

N8302858 

N8302859 

N8302860 

N8502861 

N5302862 

N8302863 

N8302864 

N8302865 

N8302866 

N8302867 

N8302868 

N3302869 

N830287Q 

N83G2871 

N8302872 

NB3D2873 

N8302874 

N8302875 

N8302876 

N3302877 

N8302878 

N8302879 

N83Q2880 

N83Q2881 

N8302882 

M8302883 

N8302884 

N83Q2885 

N8302886 

N83C2887 

N8302888 

N8302889 

N8302890 

N8302891 

N83G2892 

N8302893 

N8302394 

N83Q2895 

N83G2896 

N8302897 

N83D2898 

N8302899 

N8382900 

N8302901 

N83029D2 

N83Q2903 

N83029Q4 

N83Q29Q5 


o 

o 
o 
^ o 

; o 

o 

o 

o 

; O 
; C 
' O 

■ o 
o 
o 
o 


o 


o 


o 


I0UPV4 
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DATE5 08/19/99 



63 ’’^ 138 ‘+ 

63»1384 


FAR 


N83Q29D6 

N8302907 

N83029Q8 

N8302909 

N83D2910 

N8302911 

N8302912 

N8302913 

N83029i% 

N8302915 

N8302916 

N83Q2917 

N8302918 

N83Q2919 

N83Q2920 

N8302921 

N8302922 

N8302923 

N8302924 

N8302925 

N8302926 

H8302927 

N3302928 

N8302929 

N8302930 

N33(I2931 
N8302932 
N8302933 
N83Q2 93** 
N8302935 

N8302936 

N8302937 

N8302938 

N83Q2939 

N83Q294D 

N83Q2941 

N8302942 

N8302943 

N83D2944 

N8302945 

N8302946 

N83Q2947 

N830294S 

N8302949 

N830295Q 

N8302951 


O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 



CHANGE MODE 


O 


N33Q2953 

N3302954 

N3302955 

N3302956 

N8302957 

N8302958 

N8302959 

N83d296Q 

N8302951 

N8302962 

N63Q2963 

N8302964 

N8302965 

N83Q2966 

N8302967 

N8302968 

N3302969 

NB3Q2970 

N8302971 

N8302972 

N8302973 

N830297% 

N8302975 

N8302g76 

N83Q2977 

N8302978 

N8302979 

N8302980 

N8302981 

N83Q2982 

N63Q2983 

N8302984 

N8302985 

N8302986 

N8302987 


O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATE 


08/19/99 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


2987 

P084A 

El 03 


LDQ- 

V03,I 

2988 

P084B 

585A 


RTJ» 

IOS20 

2989 

P084C 

0 0 0 0 

IOR23 5 

NUH 

0 

2990 






2991 

P084D 

18B6 


JMP» 

IOR218 

2992 

PD84E 

C8 08 


LDA» 

^MFLG 

2993 

P084F 

0115 


SAN 

I0R236 

2994 

P0850 

D806 


RAO^ 

^MFLG 

2995 

P0851 

E8 06 


LDQ'> 

lOMSPL 

2996 

P0852 

OAOE 


ENA 

14 

2997 

P0853 

5800 


RTJ 

I OS 41 


P0854 

OIDE 




2998 

PG855 

1811 

IOR236 

JMP» 

IOR25Q 

2999 

PD856 

DOOO 

VMFLG 

NUN 

0 

3000 

PD857 

08 58 P 

lOHSPL 

ADC 

lOMSP 

3001 

P0858 

40 4F 

lOHSP 

ALF 

13t MODE 


PD859 

4 445 





P085A 

20 44 





P085B 

4946 





P085C 

4645 





P085D 

5245 





PD85E 

4E54 





PD85F 

20 4F 





P0860 

4E2C 





P0861 

4041 





Pu862 

4720 





P0863 

5441 





P0864 

50 45 




3002 

P0865 

20 OD 


NUH 

$20 00 

30 03 



' 9 - 



300 4 




COME 

HERE TO 


READ AGAIN 
+0 REQUEST CODE 

ERROR RETURN 

DONT REPEAT MESSAGE 
SET MESSAGE FLAG 
NO ERROR 

MODE MESSAGE 

CONTINUE 


DIFFERENT ON HAG TAPE 


IF SET 


300 5 
300 6 
3007 
300 8 

3009 

3010 

3011 

3012 

3013 

3014 

3015 

3016 

3017 

3018 

3019 
30 2 0 

3021 

3022 

3023 

3024 


» 


P0866 

C80Q 

IOR250 

LDA 

lORG 

P0867 

FE31 




PG868 

9121 


SU8- 

¥33,1 

P0869 

0101 


SAZ 

I0R255 




OTHERWISE ER 

PQS6A 

1806 


J.MP» 

I OR 26 2 




INITIALIZE F 

P086B 

E121 

IOR255 

LD 0“ 

W33 » I 

P085C 

ODFE 


I NO 

-1 

P086D 

CEOO 

IOR2&0 

LDA 

(lOVOlfr 

P086E 

F7C9 




PD86F 

9E0 0 


SUB 

aovon- 

P0670 

F7C9 





COME HERE TO COMPARE THE DATA OF I08UF2 AND I0BUF4 

FOR ANY MISMATCH OF A WORD OR A DIFFERENT NUMBER OF WORDS 
OF DATA IN BOTH BUFFERS TYPE OUT ERROR MESSAGE 
AND CHECK NEXT RECORD IF ANY 

NO OF WORDS IN I0BUF2 

NO OF WORDS IN I0BUF4 
EQUAL NUMBER. PROCEED 


INDEX 


N8302988 

N8302989 

N3302990 

N8302991 

N3302992 

N8302993 

N8302994 

N3302995 

N8302996 

Nd3a2997 

N8302998 

N8302999 

N830300G 

N8303Q01 

N8303002 


N83Q3003 
N83030D 4 
N83Q3005 
NS303006 
N83330D7 
N3303008 
N3303QG9 
N3303010 
N33G3011 

N8303012 

N83Q3013 

N8303014 

N8303015 

N8303016 

N83Q3017 

N8303018 

N8303019 

N830302G 

NS303021 

N8303Q22 

N33Q3Q23 

N8303Q24 

N3303025 


( } 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 
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Q 

O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


3025 

3026 P0871 0105 

302 7 

3028 

3029 

3030 P0872 F832 

3031 P0873 OAFE 

3032 PQ87^ 5800 
P0875 0178 

3033 

30 3 A P0 876 1804 
303 5 

303 6 

303 7 

3038 P0877 ODFE 

3039 

3040 
30 A1 

3042 P0878 0171 

3043 P0879 18F3 

3044 

3045 

304 6 

3047 P087A C12B 

3048 F087B 0103 

3049 P087C C12F 

3050 PD87D 9134 

3051 PC87F 0114 

3052 P087F C104 

3053 PC880 9125 

3054 P0881 0111 

3055 P0882 188B 

3056 P0883 5800 
P0884 0126 

305 7 

3058 P0885 C128 

3059 P0886 OllB 

3060 P0887 C135 

3061 P0888 0119 

3062 P0889 0842 

3063 PQ88A C800 
P038B FEOD 

3064 P088C 3800 
FD88D F0D4 

3065 PG88E 0141 

3066 P088F 0901 

3067 P0890 811C 

3068 P0891 611C 

3069 P0892 1800 
P0893 FF9A 

3070 
3Q71 
3072 



N3333026 

N33Q3027 

N83B3Q26 

N8303029 

N83Q303D 

M8303031 

M8303032 

N8303033 

N8303034 

N8303035 

N8303036 

N83G3037 

N3303038 

N8303039 

N33Q3Q4D 

N8303041 

N8303042 

N83Q3043 

N83Q3044 

N3303045 

N8303046 

N83G3047 

N83D3048 

N8303049 

N8303050 

N8303051 

N8303052 

N8303053 

N83Q3054 

N3303055 

N8303056 

N8303Q57 

N83Q3058 

N8303Q59 

N830306G 

N8303061 

N33Q3062 

N83Q3063 

N3303064 

N8303065 

N8303066 
N8303Q67 
N8303 Q68 
N8303069 
N8303070 

N33G3Q71 

N3303072 

N8303073 


c 

□ 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 



o 

o 

o 

o 

o 


N8303074 

N8303Q75 


o 


N33Q3076 

N83Q3077 

N83G3078 

N8303Q79 


O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


I0UPV4 
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DATES 08/19/99 


3030 
308 1 

3082 

3083 

3084 

3085 
303 6 
3067 
3088 
3039 

3090 

3091 

3092 

3093 

3094 

3095 

3096 

3097 
30 9 8 

3099 

3100 
310 1 

3102 

3103 
31Q4 
310 5 
310 6 

310 7 

3108 

3109 

3110 

3111 

3112 

3113 

3114 

3115 

3116 

311 7 

3118 

3119 

312 0 

3121 

3122 

3123 

3124 

3125 
312 6 
3127 
312 8 

3129 

3130 


P08A5 

PD8A6 

P08A7 

P08A8 

P08A9 

P08AA 

P08AB 

P08AC 

POSAD 

P08AE 

P08AF 

F08BO 


P08B1 
P08B2 
P 0 8 65 
PQ8B4 
P08S5 
PO 8B6 
P08B7 


00 00 
CCFE 
680B 
CllF 
0874 
680B 
C120 
680A 
COOQ 
00 00 
6808 
D8F4 


54F4 
aOQO 
0 8B9 
0000 
OflOG 
GOOD 
0 00 0 


P08B8 14EA 


P08B9 

P088A 

P088B 

P03BG 

PQ8BD 

P 08 BE 


COOO 
0 0 02 
60FF 
C8F8 
0121 
1 GE6 


■» 


COMMON SUBRDUTINE TO READ THE SPECIFIED INPUT DEVICE- IOS20 
INPUT 

(Q)=INPUT LOGICAL UNIT NUMBER 
PARAMETER LIST+0 = REQUEST CODE 
V31,I=M0DE OF READ O-BINART 1=ASCII 
V32,I=N0 OF WORDS TO BE READ 
V35,I=INDEX TO START DATA ADDRESS IN I0BUF2 

OUTPUT 


P088F A031 
POSCO 0106 
PD8C1 E8F5 




V33»I = NO OF 

WORDS ACTUALLY READ 

IOS20 

ADC 

0 



LDA» 

CIOS20T 

REQUEST CODE 


STA’*^ 

I0S2BA 



LDA- 

V31,I 

MODE 


EAQ 

A 



STA’^^ 

I0S2E 

+ LU 


LOA- 

V32,I 

NUMBER OF WORDS TO > 


STA-^ 

I0S2F 


I0S2Q K 

LDA 

= N0 



STA-’^ 

IOS2G 



RAO'^ 

IOS20 

RETURN ADDRESS 


READ 

REQUEST 


IOS2A 

RTJ- 

lAMONIJ 


IOS2BA 

NUM 

0 

■%0 RC 


ADC 

IOS206 

«•! CA 

I0S20 

NUM 

0 

+2 THREAD 

I0S2F 

NUM 

0 

^3 VI3)3-MC1I + A{2 

I OS 2F 

NUM 

0 

NUMBER OF WORDS 

I0S2G 

ADC 

0 

#■5 START ADDRESS 

Jtt 

JHP- 

(AOISPI 


'* 

at 

CHECK' FOR ANY READ 

ERROR 

IOS2G6 

LDA 

= XIOV 

RESTORE I 


SFA- 

I 



LDA^ 

I0S2E 



SAP 

I0S2D7 

NO ERROR 

at 

UMP» 

aosaoi 

ERROR RETURN . 


CHEC 

K FOR A SHORT 

READ.IF YES, SAVE NUM 

IOS207 

ANO- 

ONEBITa-14 



SA7 

IOS209 

NO SHORT READ 


LOQ^ 

IOS2G 

fSi-N-13 = LAST LOCA 


READ 


LUIIO) 


OF WORDS ACTUALLY READ 


FILLED + 1 


N83Q3081 

N8303082 

N8303083 

N8303 084 

N83Q3 085 

N8303086 

N8303087 

N8303088 

N8303089 

N830309I1 

N8303091 

N8303092 

N3303093 

N8303Q94 

N83Q3095 

N83Q3096 

N83Q3097 

N8303096 

N8303099 

NR3D3100 

N33031Q1 

N8303102 

N83Q31Q3 

N83031Q4 
M83D310 5 
N3303106 
N83831D7 
N83031G8 
N83G3109 
N3S03110 
N83D3111 
N8303112 
N8303113 
N8303im 
N830 3115 
N8303116 
N8303117 
N3303118 
N83G3119 
N33S3120 
N33D3121 

N8303122 

N8303123 

N83Q3124 

N3303125 

N8303126 

.N33G3127 

N8303128 

N8303129 

N83D313D 

N8303131 


I0UPV4 


PAGE 
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313 

1 

PD 

8C2 

F8F3 

313 

2 

PD 

8C3 

ODFE 

313 

3 

PO 

8C4 

C622 

313 

4 

PD 

8C5 

98F1 

313 

5 

PO 

8C6 

61 21 

313 

6 

PO 

8C7 

D3DD 

313 

7 

PO 

8C8 

ICDC 

313 

8 





ADQ«^ 

I0S2F 

INQ 

-1 

LDA- 

(ZERO) 

SUB^ 

IOS2G 

STA- 

V33,I 

IOS20 9 RAO'^ 

IOS20 

JMP» 

TIOS20 


» Q 


) 


NO OF WORDS ACTUALLY READ. 
ERROR FREE EXIT. 


N8303132 

N8303133 

N83Q3134 

N8303135 

N83Q3136 

N8303137 

N8303138 

N8303139 


3140 

3141 

3142 

3143 

3144 

3145 

3146 

3147 
3146 

3149 

3150 

3151 

3152 


9 - 


PD8C9 

0 000 

I0S22 

ADC 

0 

PD8CA 

68 03 


STA» 

IOS22A 

poacB 

5 4F4 


RTJ* 

IAMONI5 

P08CC 

46 0 0 


NUM 

S4600 

POSCO 

0000 

I0S22 A 

HUM 

0 

P08CE 

00 00 


ADC 

0 


COMMON SUBROUTINE TO STATUS A DEVICE 
THE L.U. OF THE DEVICE IS IN REGISTER A 


+ 0 RC FOR STATUS RE Q =3 


if- 

#■ 


OUTPUT 


W ^ 'w' 

315 4 



(A) = HAROWAR 

3155 



■IQ5 = WORD 8 

315 6 



(I) = LAST CO 

315 7 




3158 



RESTORE REGISTER I 

3159 




3160 

P08CF 

EOOO 

LDQ =XIOV 


PG8D0 

0 002 P 


3161 

POSOl 

4QFF 

STQ- I 

3162 

P08D2 

1CF6 

UMP» (I0S221 

3163 





E STATUS 

OF PHYSICAL DEVICE TABLE 

RE ADDRESS STORED ON A DATA TRANSMISSION 


N8303141 
N8303142 
N8303143 
N8303144 
N8303145 
N83D3 146 
N8303147 
N33C3148 
N83Q3149 
N830315D 
N33Q3151 
M8303152 
N8303153 
N8303154 
N8303155 
N3303156 
M83D3157 
N6303158 
N8303159 
N83Q3160 
N8303151 

N8303162 

N8303163 

N8303164 


3165 

3166 

3167 

3168 

3169 

3170 

3171 

3172 

3173 

3174 

3175 

3176 


COMMON SUBROUTINE 
READING THE INPUT 


P08D3 

0 000 

IOS23 ADC 

0 

P08D4 

E116 

LDQ- 

V22.I 

P08O5 

C2Q9 

LDA- 

9,0 

P03D6 

AD26 

ANO- 

ONEBIl 

P08D7 

0FC9 

ALS 

9 

PD808 

BllF 

EOR- 

V3i,I 

P08D9 

0101 

SAZ 

103239 

P08DA 

D8F6 

RAO^ 

I0S23 


TO DETERMINE THE CHANGE IN MODE OF 
DEVICE. 


PHYSICAL DEVICE TABLE 
STATUS WORD 1 
ACTUAL READ MODE 


REQUESTED READ MODE. 
EXIT. NO CHANGE OF MODE 
CHANGE OF MODE EXIT 


N8303166 

N830316? 

N8303166 

N8303169 

N83D3170 

N83G3171 

N8303172 

N8303173 

N8303174 

N8303175 

N5303176 

N3303177 


I0UPV4 
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3177 PD8DB 1CF7 I0S239 JHP» (I0S23i 

3178 ^ 


N33Q3178 

N8303179 


O 

O 


3180 

3181 
3132 
3183 
3134 
3185 
318 6 
318 7 
318 8 

3189 

3190 

3191 

3192 

3193 


»■ 


P08DC 

00 

GO 

I0S24 ADC 

0 

P08DD 

Cl 

24 

LDA- 

V36,I 

P08DE 

68 

OB 

STA=» 

I0S24C 

P08DF 

Cl 

23 

LDA- 

V35,I 

P08E0 

81 

36 

A DO- 

VABUF ,I 

PG8E1 

68 

09 

ST 

IOS24D 

P08E2 

Cl 

ID 

LDA- 

V29tl 

P08E3 

68 

09 

STA^ 

I0S24F 


COHHON SUBROUTINE TO WRITE DATA (OF IN8UF2} TO INTERMEDIATE 
STORAGE AT THE CURRENT SCRATCH ADDRESS 


NO OF WORDS TO BE WRITTEN 


LSB 


319 

4 




319 

5 




319 

6 

P08E4 

p4 

F4 

319 

7 

PQ8E5 

4C 

00 

319 

8 

P08E6 

08 

EE 

319 

9 

P0 8E7 

90 

00 

320 

0 

P08E8 

08 

B3 

320 

1 

PD8E9 

00 

GO 

320 

2 

P08EA 

00 

00 

320 

3 

P08EB 

09 

00 

320 

4 

PQ8EC 

GO 

00 

320 

5 




320 

6 

POSED 

14EA 

320 

7 




320 

8 

PO SEE 

CO 

00 



P0 8EF 

00 

02 

320 

9 

POSFO 

60FF 

321 

0 

P08F1 

C8 

F6 

321 

1 

P08F2 

0122 

321 

2 

P08F3 

GO 

B3 

321 

3 

PQ8F4 

18 

2D 

321 

4 




321 

6 

PB8F5 

0 8 

44 

321 

6 

P08F6 

61 

23 

321 

7 




321 

8 

PB8F7 

08 

42 

321 

9 

P08F8 

C8 

FD 

3 22 

0 

P08F9 

38 

ID 

322 

1 

P0 8FA 

01 

41 

322 

2 

P08FB 

09 

01 

322 

3 

P08FC 

81 

ID 

322 

4 

POSFO 

61 

ID 

322 

5 






I/O 1 

REQUEST TO 

WRITE DATA ON THE SCRATCH 

V 

UNIT 





RTJ- 

(AMONIJ 




NUM 

$4C0Q 


RC F WRITE 


ADC 

I0S242 


CA 

I0S24A 

ADC 

0 

*2 

THREAD 

I0S248 

NUM 

$0883 

+ 3 

VI3),Mtll ,A12) ,LU 

IOS24C 

NUM 

0 

Hh 

NUMBER OF WORDS 

I OS 24 D 

ADC 

0 

+ 5 

STARTING ADDRESS 

I0S24E 

NUM 

0 

■*■6 

MSB 

I0S24F 

NUM 

0 

«■? 

LSB 

'yt. 

JMP- 

JADISF) 



I0S242 

LDA 

= XIOV 

RES 

:TORE I 


STA- 

I 




LDA^ 

I0S24B 




SAP 

I0S243 

NO 

ERROR SKIP 


LDA- 

$B3 

iU 



JMP^ 

IOS254 

REJECT. 


AREA OF THE LIBRARY 


I0S243 

9 


CL R 
STA- 


A 

l?35,I 


RESET INDEX TO DATA BUFFER 


UPDATE SCRATCH 


CLR 

LDA» 

QVT* 

SQZ 

INA 

Aon- 

STA- 


Q 

I0S24C 
I0S24Hf 1 

1 

1 

V29,I 

V29tl 


ADDRESS FOR NEXT 
CALCULATE NO 


NEW DATA 
, SECTORS 


WRITTEN 


UPDATE POINTER TO NEXT SECTOR 
TO BE WRITTEN 


N8303181 

N8303182 

N83fl3183 

N8303184 

N8303185 

N8303186 

N83Q3187 

N8303188 

N8303189 

N8303190 

N8303191 

N8303192 

N8303193 

N8303194 

N8303195 

N83Q3196 

N83Q3197 

N8303198 

N8303199 

N83332Q0 

N83032Q1 

N83032Q2 

N63032G3 

N83032G4 

N83Q3205 

N83G32Q6 

N83D3207 

N83032S8 

N8303209 

N8303210 
N83D32il 
N830321 2 
N8383213 
N8303214 
N8303215 
N3303216 
N8333217 
N8303218 
N8303219 
N830322C 
N8303221 
N8303222 
N8303223 
N33D3224 
N8303225 
N33Q3226 


O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 
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3226 




UPDATE THE CONTROL 

3227 





3228 





3229 

P08FE 

El IE 

IOS24K 

LDQ- V30,I 

3230 

P08FF 

CllF 


LDA- ¥31,1 

3231 

P0900 

0FC3 


ALS 3 

3232 

P0901 

8 3E7 


AOD^ I0S24C 

3233 

P0902 

FI 37 


ADO- yDBLtl 

3234 

P0903 

6622 


STA- {ZERO),Q 

3235 

P0904 

0814 


TRQ A 

3236 

P0905 

9137 


SUB- ¥OBL,I 

323 7 

P0906 

09A0 


INA -95 

3238 

P0907 

0112 


SAN I0S244 

3239 

P0908 

5804 


RTJ» I OS 2 5 

3240 

P09G9 

1CD2 


(I0S24) 

3241 

P09CA 

DUE 

IOSZ44 

RAO- ¥30,1 

3242 

P0908 

ICDD 


(I0S24f) 


BUFFER WORD - MODE AND NO 0 F WORDS WRITTEN 

INDEX TO CURRENT ENIRT IN CONTROL BUFFER 
MODE 

NUMBER OF WORDS 

CHECK CONTROL BUFFER IS FULL 

CONTROL BUFFER, AND EXIT. 


N83Q3227 

N8303226 

N83Q3229 

N830323D 

N8303231 

N8303232 

N8303233 

N8303234 

N83G3235 

N33D3236 

N8303237 

N8303238 

N83D3239 

N8303240 

N3303241 

N83G3242 

N8303243 


O 

O 

O 

o 

o 


3244 




COME HERE TO WRITE 

3245 




3246 



'9- 

RESET POINTERS TO ’ 

3247 




ADC 0 

3248 

PQ9 0C 

0 0 00 

IOS25- 

3249 

P090D 

Cl 37 


LDA- VOBL,I 

3250 

P09OE 

68 09 


STA'^ I0S25C 

3251 

3252 

P090F 

CliC 

9 

LDA- ¥28,1 

3253 

3254 

P091G 

6809 

9 

STI\'* IOS25B 
RTJ- (AMONII 

3255 

P0911 

5 4F4 


3256 

P0912 

4C00 


NUM S4C0O 

325 7 

P0913 

091B 

P IOS25A 

AOC 105252 

3258 

P0914 

0 0 00 

I0S24G 

ADC Q 

3259 

P0915 

0 8B3 

IOS24H 

NUM $0883 

3260 

P0916 

00 60 

IOS25C 

NUM 96 

3261 

P0917 

0 0 0 0 

ADC 0 

3262 

P0 918 

OOQG 


NUH 0 

3263 

P0919 

0 0 00 

IOS258 

NUM 0 

3264 



9 

BMP- (AOIS'Pl 

3265 
326 6 

P091A 

14EA 

9^ 

CHECK ANY ERROR IN 

3267 




3268 



19 

LOA =XI0V 

3269 

PO 91B 

cuoe 

IOS252 

P091C 

0002 

P 

STA- I 

327Q 

3271 

P091D 

60FF 


LDA-’ I0S24H 

3272 

PO 91E 

C 8F 6 


327 3 

P091F 

0123 


SAP I0S255 

3274 

P0920 

C0B3 


LDA- $B3 


THE FULL CONTROL BUFFER, AND THEN 
rH'E START FOR THE NEW CONTROL BUFFER 


+0 RC FWRITE 
CA 

#■2 THREAD 
*■3 ¥,H,A,LU 
■*■4 NUMBER OF 
*5 STARTING 
!^6 MSB 
LSB 


RESTORE I 


CHECK ERRORS 
NO ERROR 
LU 


WORDS 

ADDRESS 


N8303245 

N8303246 

N8303247 

N8303248 

N33Q3249 

N8303250 

N83Q3251 

N33Q3252 

N83Q3253 

N33032B4 

N8303255 

N8303256 

N8303257 

N8303258 

N33Q3259 

N3303260 

N33Q3261 

N3303262 

N3303263 

N3303264 

N3303265 

N83Q3266 

N83032&7 

N3303268 

N83Q3269 

N8303270 

N83G3271 
N8303272 
N8303273 
N83 03274 
N8303275 


O 

O 

O 

o 

o 

o 

o 

o 

o 
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n 


O 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


3275 

3276 

3277 

3278 

3279 

3280 

3281 

3282 

3283 


P0921 

P0922 


P0923 

P0924 

P0925 

PD926 

P0927 


1800 

FD81 


C122 
0113 
C124 
A 0 32 
6124 


I0S254 JMP IOR072 


■» 


I0S255 


CHECK any mode CHANGED FOR THE INPUT DATA READ 


328 4 





3285 

P0928 

0 8 44 

I0S256 

CLR 

328 6 

P0929 

611E 


STA- 

3287 





3283 




UPDA' 

3289 





3290 

P092A 

CUD 


LDA- 

3291 

P092B 

61 1C 


STA- 

3292 





3293 




BUMP 

3294 





3295 

P092C 

DllD 


RAO- 

3296 





329 7 




ANO ^ 

3298 





3299 

P092D 

IGDE 


JHP» 

330 0 





330 2 





3303 



#• 

GOMHi 

330 4 





33 0 5 

PD92E 

00 DO 

I0S27 

ADC 

3306 

O092F 

G121 


LDA- 

33 0 7 

P0 93Q 

6810 


STA=^ 

33 0 8 

P0931 

C800 


LDA 


P0932 

FOCE 



3309 

P0933 

680C 


STA'» 

3310 



=3=- 


3311 





3312 

P0 934 

OAOl 


ENA 

3313 

P0935 

5800 


RTU 


P0936 

0 0 7E 



3314 

P0937 

EllF 


LDQ- 

3315 

P0938 

0141 


SQZ 

3316 

P0939 

A 0 3E 


AND- 

3317 

P093A 

6802 

I0S279 

STA» 

3318 





3319 

P093B 

54F4 


RTJ- 

3320 

P093C 

0000 

IOS27R 

NUM 

3321 

P093D 

0 9 43 

P 

ADC 


LQA- V34,T 
SAN 103256 
LDA- \/36tI 
AND- ONEBITiHS 
STA- V36,I 


y 30 f I 


CHECK READ MODE CHANGED FLAG 
SKIP IF HODE CHANGED 

OTHERWISE CLEAR NO OF WORDS IN CONTROL WORD 
AND RETAIN THE PREV READ MODE IDENTIFIER 


INDEX TO CURRENT CONROL BUFFER WORD 


ADDRESS FOR NEXT DATA BUFFER 


TO CALLER 


(I0S25) 


SUBROUTINE TO PUNCH CARDS 


NUMBER OF WORDS TO PUNCH 


0 

y33 ,i 

I0S27G 

lORK 

I0S27B 


GET THE WRITE REQUEST CODE 

1 

I0S38 

V31,I 
I OS 2 7 9 
ZROBIT-m 
I0S27P. 


63»1385 


(AMONII 

0 

I0S272 


4-0 

H- 1 


RC 

CA 


N8303276 

N8303277 
N8303278 
N8303279 
N83Q3280 
N8303281 
N8303282 
N83Q3283 
N8303284 
N8303285 
N83D3286 
N83Q3287 
N8303288 
N8303289 
N8303290 
N8303291 
N8303292 
N83Q3293 
N8303294 
N8303295 
N8303296 
N8303297 
N8303298 
N83Q3299 
N83Q330 0 
N33033D1 


N8303303 

N8303304 

N33G3305 

N83Q3306 

N33Q33D7 

N8303308 

N33033G9 

N830331Q 
N83Q3311 
N3303312 
N83 03313 
N83G 3314 


N830 

N83Q 

N830 

N830 

N830 

N830 

N83Q 

N830 


3 315 
3 316 
3 317 
3 318 
3 319 
3320 
3 321 
3 32 2 


□ 

o 

o 

o 

o 

o 

o 

C) 

o 

o 

o 

o 

o 

o 

o 


o 


o 
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o 


3322 P093E 00 00 

3323 P093F 0000 

3324 P0940 0000 

3325 P0941 0AA9 P 

3326 

3327 P0942 14EA 

3328 

3329 P0943 GOOD 
P0944 0002 P 

3530 P0945 50FF 

3331 

3332 P0946 C8FB 

3333 P0947 0121 
333ti P0948 1808 
33 3 5 

3336 

3337 
33 5- S- 

3339 P0949 1CE4 
334 0 


IOS27A ADC 0 
I0S27B ADC 0 
I0S27G NUM 0 
I0S27C ADC IOBUF2 

JMP- lAOISF) 

IOS272 LDA =XI0\? 

STA- I 

»■ 

LDA^ I0S27B 
SAP I0S277 
JMP’^ I0S254 


EXIT 

I0S277 JMP^ (I0S27? 
* 


*2 T 

V,MA,LU 
+4 NUHBER 

»-5 STARING ADDRESS 


RESTORE I 


CHECK ERRORS 
MO ERROR 
ERROR REJECT 


O 

O 

O 

O 

O 

o 

o 

o 


334 2 
3343 
334 4 

3345 P094A 0000 

3346 

334 7 PD94B 0125 

3348 

3349 P094G C109 

3350 P094D AOOA 

3351 P094E 09B9 

3352 P094F 0116 
^363 

3354 P095G C124 

3355 P0951 A02E 

3356 P0952 0107 
33 5 7 

3358 PG953 D126 
33 5 9 

3360 P0954 C126 

3361 P0955 1802 

3362 P0956 C125 

3363 P0957 6121 

3364 P0958 9103 

3365 P0959 01Q4 

3366 

3367 

3368 P095A C124 

3369 P095B A02C 

3370 P095C 0111 




COHHON SUBROUTINE TO CHECK ALL TAPE MOTION DONE 


IOS30 

if. 

w 

» 

» 


ADC 0 
RAO- \?37^T 


AND- LPHlASK»-8 
INA -$46 
SAN IOS3Q5 
FOR FILES 
LDA- V36,I 
AND- ONEBITHI 
SA7 IOS308 


BUMP OF RECORDS READ 
CHECK FILE OR RECORD SKIP 

SKIP IF RECORDS 

CHECK FILE MARK IS SENSED. 
NO END OF FILE 


RAO- ^38, I BUMP NBR OF FILES READ 

CHECK MOTION COHPLETFO 
LDA- V38.I 
JHP^ IOS306 
IOS305 LDA- V37.I 
IOS306 STA- V33,I 
SUR- V03.I 

SAZ IOS309 SKIP ALL DONE 


9 

IOS388 LDA- V36.I 

AND- ONEBITii-9 
SAN I0S3Q9 


CHECK END OF TAPE 
SKIP IF YES 


O 


N8303323 

N8303324 

N8303325 

N8303326 

N8303327 

N63G3328 

N83Q3329 

N8303330 

N8303331 
N3303332 
N3303333 
N83G3 334 
N8303335 
N830 3336 
N8303337 
N83G3338 
N8303339 
N8303 J40 
N83l}33'4l 


N3303343 

N8303344 

NS303345 

N8303346 

N8303347 

N8303348 

N83Q3349 

N830335D 

N83Q3351 

N8303352 

N3303353 

N8303354 

N83D3355 

N83Q3356 

N83G3357 

N83G3356 

N3303359 

M83G3360 

N3303361 

N8303362 

N83Q3363 

N83G3364 

N8303365 

N8303366 

N33Q3367 

N8303368 

N8303369 

N8303370 

N83D3371 


Q 

Q 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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3371 

3372 

P095O 

08EC 


RAO=^ 

IOS30 


N8303372 

N8303373 

3573 

3374 

P095E 

ICEB 

IOS309 

JHP’ 

(103301 

EXIT 

N8303374 

N3303375 


3376 








N3303377 

3377 






COMMON ROUTINE TO OETERHINE STATUS 

63»1384 

N8303373 

3378 



* 



»A' = LOGICAL UNIT NUMBER OF DEVICE 

63’^1384 

N33Q3379 

3379 







63»1384 

N8303380 

3380 

P095F 

OBOO 

I0S33 

NOP 

0 


63»1384 

N83Q3381 

3381 

P0960 

0 822 


TRA 

Q 

LU IN *Q» 

63^^1384 

N8303382 

3382 

P0961 

EE 00 


LDQ 

lALOGlAi ,Q 

GET PHYSTA8 ADDRESS 

63^1384 

N83G3383 


P0962 

F A4F 







3383 

PG963 

C203 


LDA- 

8,Q 

GET DEVICE TYPE IN 

63-1384 

N3303384 

338=+ 

P0964 

0FC5 


ALS 

5 


63-1384 

N8303385 

3385 

P0965 

A005 


ANO~ 

$5 


63^1384 

N8303386 

3386 

P0966 

09FE 


INA 

-1 

MAG TAPE 

63^1384 

N83D3387 

3387 

P0967 

0104 


SAZ 

I0S33M 

SKIP IF MAG TAPE 

63’fl334 

N8303388 

3388 

P0968 

09FD 


INA 

-2 

CARO READER 

63-1384 

N8303389 

3389 

P0969 

0108 


SAZ 

IOS33C 

SKIP IF CARD 

63*1384 

N33fl3390 

3390 

P096A 

09FE 


INA 

-1 

PAPER TAPE 

63*1384 

N83G3391 

3391 

P096B 

QIOC 


SAZ 

I0S33P 

SKIP IF PAPER TAPE 

63*1364 

N3303392 

3392 






IF NONE - CALL IT MAG TAPE 

63*1384 

N8303393 

3393 



* 




63*1384 

N8303394 

3394 

PD96C 

C20C 

IOS33 M 

LDA- 

12, Q 

GET STATUS WORD 

63*1384 

N8303395 

3395 

PQ96D 

QFC4 


ALS 

4 

BIT 11 

63*1384 

N8303396 

3396 

P 0 96E 

013F 


SAH 

IOS335 

SKIP IF EOF 

63*1384 

N83G 3397 

339 7 

P096F 

0FC3 


ALS 

3 

BIT 8 

63*1384 

N8303398 

3398 

P0970 

D13B 


SAH 

I OS 33 2 

SKIP IF PARITY ERROR 

63*1384 

N8303399 

3399 

PQ971 

18DC 


JHP» 

I0S333 

SOME OTHER ERROR 

63*1384 

N8303400 

340 0 







63*1384 

N83034G1 

3401 

P0972 

C20C 

I0S33C 

LOA- 

12,Q 

GET STATUS WORD 

63*1384 

N8303 402 

3402 

P0973 

0FG4 


ALS 

4 

BIT 11 

63*1384 

N33Q3403 

3403 

P0974 

0139 


SAM 

I0S335 

SKIP IF EOF 

63*1334 

N83034Q4 

340 4 

P0975 

A 0 27 


AND- 

$27 

MUST CALL NOT READY EOF 

63*1384 

N8303405 

3405 

P0976 

0107 


SAZ 

I0S335 

SKIP IF NOT READY (EOF} 

63*1384 

N83Q3 40 6 

3406 

P0 977 

18 06 


JMP* 

IOS333 

SOME OTHER ERROR 

63*1384 

N83D3407 

340 7 







63*1384 

N33034D6 

340 8 

P0978 

C20C 

I0S33P 

LOA- 

12tQ 

GET STATUS WORD 

63*1384 

N33G3409 

3409 

P0979 

0FC4 


ALS 

4 

BIT 11 


N830341.0 

3410 

P097A 

0133 


SAM 

IOS335 

SKIP IF EOF 


NS303411 

3411 

P097B 

1802 


JMP^ 

I0S333 

SOME OTHER ERROR 

63*1384 

N8303412 

3412 



K- 




63*1384 

N83Q3413 

3413 

PQ97C 

08F2 

IOS332 

RAO^ 

IOS33 

PARITY ERROR MAG TAPE 

63*1384 

N830 3 4l4 

3414 

P097D 

□ 8E1 

IOS333 

RAO^ 

IOS3 3 

SOME OTHER ERROR ALL 

63*1384 

N8303415 

3415 

PO 97E 

ICEO 

I0S335 

JMP^ 

(I0S3.35 

RETURN WITH *Q* = PHYSTAB ADR 

63*1384 

N8303416 

3416 



V- 





N8303417 

3417 

PQ97F 

0000 

I0S32A 

NUM 

0 



N8303418 


I0UPV4 
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DATEI 08/19/99 


( '! 


/ 1 


o 

o 

o 

o 

o 

o 


3419 

3420 

3421 


3422 

P093G 

OQOO 

3423 

P0981 

48FD 

3424 

P0982 

58QB 

3425 

P0983 

OOOJ3 

3426 

P0984 

40FF 

3427 

P0985 

E8F9 

3428 

PQ986 

6209 

3429 

P0987 

GOFF 

34 3 0 

P0988 

6208 

3431 



3432 

PD989 

QAOB 

3433 



3h3 4 

P098A 

58D0 


P098B 

00 A7 

3435 



3436 

P098C 

1GF3 


3437 


Sf- 

I0S35 


I0S351 


COMMON SUBROUTINE TO SEND OUT A MESSAGE 


ADC 

STQ^ 

RTJ* 

NUH 

STO- 

LOQ» 

STA- 

LDA- 

STA- 

ENA 

RTJ 


0 

I0S32A 

IOS36 

0 

I 

I0S32A 

9, a 

I 

8,Q 

II 

I OS 41 


SAVE MESSAGE ADDRESS 

BINARY TO ASCII 

10*=»4 VALUE IF APPLICABLE 


JMP» (IOS353 


N8303420 

N83G3421 

N8303422 

N8303423 

N8303424 

N83Q3425 

N8303426 

N83D3427 

N3303428 

N83D3429 

N83C3430 

N8303431 

N33G3432 

N8303433 

N8303434 

N83Q3435 

N8303h36 

N8303437 

N3303438 


O 


O 

o 

o 

o 


o 



3439 







3440 




COMMON SUBROUTINE TO 

o 

3441 




5 DIGIT 10-99999) 

3442 

3443 







P098D 

3u00 

I0S3&. 

ADC 

0 


3444 

P093E 

OC 00 


ENQ 

0 

o 

3445 

P098F 

30 00 


DVI 

=N100C0 


PQ993 

2710 


INA 

S30 


3446 

P0991 

0930 



3447 

P0992 

6CFA 


• STA^ 

1I0S36) 

o 

344 3 

PQ993 

D3F9 


RAO'-^ 

I0S36 

344 9 

P0994 

QF70 


LRS 

16 


3450 

3451 

P0995 

3000 


DVI 

=N1000 

o 


P0996 

03E8 



$30 

3452 

P0997 

'0930 


INA 


3453 

P0998 

0FC8 


ALS 

8 


3454 

P0999 

6810 


STA^' 

I0S36A 

o 

3455 

PQ99A 

0F70 


LRS 

16 

3456 

P099B 

30 00 


nvi 

= N10Q 



P099C 

00 64 


INA 

$30 


3457 

PQ99n 

0930 


o 

345 8 

P099E 

B8 OB 


EOR^ 

I0S36A 

3459 

3460 

P099F 

680A 


STA’^ 

LRS 

I0S36A 

16 



3461 

P09A0 

0F7Q 


o 

3 462 

P09A1 

30 00 


DVI 

= N10 


P09A2 

OQOA 





N8303440 

CONVERT A BINARY NUMBER TO ASCII N3303441 

N3303 442 
N 83 03 443 
N83Q3H44 
N3303445 
N8303446 

N8303447 

N8303448 

N8303449 

N830345G 

N8303451 

N8303452 

N8303453 

N8303454 

N3303455 

N83Q3456 

N3303457 

N8303458 

N8303459 

N830346Q 

N83G3461 

N8303462 

N83D3463 


O 

r') 

*•«»«' 

O 

O 

o 

o 

o 

o 


o 


o 
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3463 

3464 

3465 

P09A3 

P09A4 

P09A5 

0 93 0 
0FG8 
0 874 


INA 

ALS 

EAQ 

$30 

8 

A 


346 6 

P09A6 

0 9.30 


INA 

$30 

A=LSB 

3467 

P09A7 

E8 02 ■ 


LOQ» 

I0S36A 

a= MSB 

3468 

3469 

P09A8 

1CE4 


JMP* 

(I0S36) 

EXIT 

3470 

3471 

P09A9 

0000 

IOS36A 

NUM 

0 

T'EMPY STORAGE 


3473 






3474 



* 

COMMON SUBROUTINE ¥0 CLEAR I08UF4 

3475 




ADC 

0 

3476 

P09AA 

0 0 0 0 

IOS37 

3477 

P09AR 

EO GO 


LDQ = 

N191 


PS9AC 

0 0 BF 




3478 

P09AD 

0 8 44 


CLR A 

(lOVOl+VVBUF-ll^Q 

3479 

P09AE 

6E00 

I0S375 

STA 


P09AF 

F68A 


INQ 


3480 

P09B0 

OOF£ 


-1 

3‘+81 

P09B1 

0171 


SQM 

I0S379 DONE 

3482 

PQ9B2 

18FB 


JMP» 

I0S375 LOOP 

3*^83 

P09B3 

1CF6 

I0S379 

JMP^ 

{I0S37I EXIT 

3484 







N8303464 

N83Q3465 

N8303466 

N8303467 

N8303468 

N83D34&9 

N8303h70 

N8303471 

N83Q3472 


N3303474 

N8303475 

N8303476 

N8303477 

N8303478 

N83Q3-f79 

N8303480 

N83Q3h81 

N8303482 

N8303463 

N3303484 

N8303485 


3486 

3487 
3438 
3489 
349Q 
3491 
3 49 2 

3493 

3494 

3495 

3496 

3497 

3498 

3499 
350 0 

3501 

3502 
35D3 

3504 

3505 

3506 

3507 






N8303487 

If- 

COMMON SUBROUTINE TO DETERMINE THE 

REQUEST CODE 

N8303488 


FOR THE REAO/WRITE 



NS3 Q 3 489 





N3303490 


INPUT 



M330S491 


V08,I=REQUEST INDEX 



N8303492 


A==0 FOR READ 



N830 3 49 3 


A=1 FOR WRITE 



NS303494 





N8303495 

■if- 

OUTPUT 



N8303496 

# 




N83D3497 

'If- 

FOR READ 



N8303498 


OF THE CC,Cfi, FC,VCC,¥C?i 



Na303499 

at 

IF X=0 OR IS HISSING- FREAD 

(A) = $0800 


N83Q350Q 

'# 

I F X.EQ.O OR IS MISSING FREAD 


CA)=$4800 

N8303501 


IF X.NE.O UNFORMATTED READ 

.(A )=$0 20 0 


NS303 502 


IF X.NE.O UNFORMATTED READ 


i A) = $4200 , 

N83035B.3 

at 

FOR ALL OfHF-R REQUESTS FREAD 

iA}=$080B 


N830 3 50 4 


FOR ALL OTHER REQUESTS FREAD 


1 A) = 4800 

N830 3505 





N3303506 

at 

FOR WRITE 



N8303507 

•at 

OF THE CC,CMt'HC,VCC,VCM 



N3303508 


I0UPV4 


PACE 83 


DATE: 08/19/99 


o 

c 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


35 0 3 

350 9 

3510 

3511 

3512 

3513 

3514 

3515 P09B4 GOOD 

351 6 

3517 P09B5 610F 

351 8 

3519 P09B6 OCOO 

352 0 

3521 PQ9B7 CA24 

3522 P09B8 0135 

3523 P09B9 8129 

3524 P09BA 0111 

3525 P09BB 1812 

3526 

3527 P09BC 0D02 

3528 

3529 pogen 13F9 

353 0 

3531 P09BE C1Q9 

3532 POgaF BO 00 
PQ9C0 5050 

3533 P09C1 0115 

3534 

3535 P09C2 G02C 

3536 P09G3 Ei OF 

3537 P09C4 0146 

3538 

3539 P09C5 C02O 

3540 P09C& 1805 

3541 
364 2 

3543 P09C7 C02E 

3544 P09C8 €1 OF 

3545 P09C9 0141 

3546 P09CA BQ2D 

3547 

3548 P09CB 8031 

3549 P09CC 1CE7 

3550 

3551 

3552 

3553 

3554 

3555 
355 6 
3557 
3553 
3559 


IF X=0 OR IS HISSING--FWRITE IA)=$0C00 

IF X, EQ.O OR IS HISSING FWRITE IA1=S4CQ0 

IF X.NE,0 UNFORHATTED WRITE (A1=SQ400 
IF X. NE.O UNFORMATTED WRITE CA3 = $4400 

FOR ALL OTHER REQUESTS FWRITE {A)=$0CQQ 

FOR ALL OTHER REQUESTS FWRITE tA)=$4C00 


STA- V15,I 
ENQ 0 

LDA^ I0S38T»Q 
SAM I0S38A 
EOR- ¥08,1 
SAN I0S38B 
JMP» I0S384 


cJMP"'- I OS 381 

LOA- ¥09,1 
EOR =APP 

SAN I0S332 

LDA- ONEBIT8-9 
LDQ- ¥15,1 
SQZ I0S383 


SAVE THE REQUEST INDICATOR 

INITIALIZE FOR THE TABLE SEARCH 

GHT THE TABLE ENTRY 
SKIP IF END OF TABLE 
CHECK CURRENT REQUEST CODE 
NO HATCH SKIP 
MATCH IS FOUND 

GET NEXT ENTRY 

CHECK WHETHER A PP/VPP REQUEST 

SKIP IF NOT A PP/VPP 

A=0200 READ 

SKIP IF UNPUT 

A=$0400 WRITE 


LDA- ONEBITflO A=$0400 WRITE 

FOR ALL REQUESTS NOT IN TAVLE SET UP FOR FORMATTED READ/ WRITE 


LOA- ONEBIT+11 A=$B800 

SQz' IOS383 SKIP IF INPUT READ 

EOR- ONEBITfrlO FOR OUTPUT A=$0CQD 

EOR- 0NE8IT*-14 
JHP* (10338? 

FOR A MATCH OF THE REQUEST DETERMINE THE VALUE OF PARAMETER 

IF X=0 THEN THE INPUT/OUTPUT WILL BE FORMATTED TYPE 
OTHERWISE FOR L NE . 0 IT WILL BE UNFORMATTED TYPE 

THE POSITION OF THE X PARAMETER IN THE REQUEST IS INDICATED 
IN THE NEXT WORD OF THE MATCHING TABLE ENTRY 
ADDRESS OF THE ENTRY IS IN Q 


N8303509 
N8303510 
N3303511 
N33Q3512 
N8303513 
N8303514 
N33Q3515 
N8303516 
N8303517 
N8303518 
N83D3519 
N8303520 
N8303521 
N8303522 
N8303523 
N33D3524 
N83G 3 52 5 
N8303526 
N8303527 
N3303528 
N3303529 
N830353Q 
N8303531 
N8303 532 
N8303533 

N3303534 
N33Q3535 
N8303536 
N8303537 
N8303536 
N8303539 
N83D3540 
N8303541 
N8303542 
N83Q3543 
N830 3 544 
N83G3545 
N8303546 
N8303547 
N3303548 
N8303549 
N8303550 
N83Q3551 
N83Q3552 
N8303553 
N8303554 
N8303555 
N83Q 3556 
N8303557 
N3303558 
N3303559 
N830356D 


O 

O 

o 

o 

o 

o 

o 

n 

o 

o 

o 

o 

o 

o 

o 

o 


o 
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DATE; 08/19/99 



3560 

PD9C0 

ODOl 

I0S384 INQ 

1 


GET THE X PARAMETER 



N8303561 

kJ 


3561 

PQ9CE 

FA DD 

LOQ» 

I0S38T, Q 





N8303562 



356? 

P09CF 

CAOO 

LDA 

lOVOl ,0 





M8303563 


o 

3563 

P09D0 

P09D1 

F632 

0111 

SAN 

IOS385 


SKIP IF NZERO 



N8333564 

o 


3564 

P09O? 

18F4 

JMP» 

I OS 38 2 


JUMP IF X IS MISSING 

OR 

ZERO 

N83D3565 



356 5 








M8303566 


o 

3566 









N8303567 

o 

3567 



» GET 

THE NUMBER 

OF 

WORDS FOR REAO/WRITE 



N83Q3566 


3568 



p 






N8303569 



3569 

P09D3 

0 A3C 

IOS385 ENA 

60 





M830357C 


o ■ 

3570 

P09D4 

6120 

STA- 

V32,I 





N8303571 

o 

3571 

P09D5 

6121 

STA- 

V33, 1 





N83Q3572 


357? 



-ff- 





N8303573 



3573 



* CHECK FOR INPUT /OUTPUT 



N8303574 


o 

3574 

3575 

P09O6 

C0 2C 

»■ 

LDA- 

ONEBITa-9 


A=$02Q0 



N8303575 

N6303576 

o 


3576 

P09D7 

ElOF 

LDQ- 

V15,I 





NS303577 



3577 

P09D3 

0141 

SQZ 

IOS366 


SKIP IF INPUT 



N8303578 


o 

3578 

Pfl9D9 

QFCl 

ALS 

1 


A=$Q400 FOR OUTPUT 



N8303579 

o 

3579 

■SI- 





N8303580 


3580 

P09DA 

18F0 

IOS-386 JHP» 

IOS383 


EXIT 



N8303581 



3581 









N8303582 


o 











o 

o 

3583 

3584 



It’ 

TABL'E FOR VALIDATION OF REQUESTS USED IN 

I0S38 ROUTINE 

N8303584 

N8303585 

o 


3585 



•Sf- 






N8303586 



358 6 



» FOR 

X PARAMETER 

NZERO THE REAO/WRITE IS 

ALWAYS FORMATED 

N8303587 


o 

3587 

3588 



Sf- 

^ 1ST 

WORD OF ENTRY= 

REQUEST CODE INDEX 



N8303588 

N8303589 

o 


3589 



2ND 

WORD OF ENTRY= 

POSITION OF X PARAMETER 

IN REQUEST 

N8303590 



3590 



* 






NB303591 


o 

3591 

pflgoB 

00 00 

IOS38T NUH 

0 


♦ 00 CC 



N8303592 

o 

3592 

P09OC 

00 04 

NUM 

4 


4TH PARAMETER 



N8303593 


3593 

PQ9DD 

0 001 

NU^f 

1 


9-01 CM 



N83Q3594 



3594 

P09DE 

00 04 

NUH 

4 


4TH PARAMETER 



N8303595 


o 

3595 

P09DF 

OOOA 

NUM 

10 


+ 10 MC 



N3303596 

o 

3596 

P09E0 

0 0 06 

NUM 

6 


6TH PARAMETER 



N8303597 


3597 

P09E1 

OOQE 

NUM 

14 


♦14 ¥CC 



N8303598 



3598 

P0 9E2 

0 0 03 

NUM 

3 


3RD PARAMETER 



NB303599 


o 

3599 

P0 9'E3 

0010 

NUM 

16 


♦16 ¥CH 



N830360G 

o 

3600 

P0 9E4 

0 0 04 

NUM 

4 


4TH PARAMETER 



N33Q3601 


36G1 

P09E5 

80 00 

NUM 

$8000 


END OF TABLE 



N8303602 



360 2 

■» 





N8303603 


o 











o 

o 

360 4 
3605 



tf- 

^ COHHON SUBROUTINE 

TO CLEAR IOBUF2 



N8303605 

N8303606 

o 


o o 


o 


o 


I0UPV4 


PAGE 


85 


date: 08/19/99 



o 

o 

o 

o 


360 6 

3607 P09E6 GOOD 
360 8 P09E7 03 44 

3609 P09E3 EO 00 
P09E9 OOBF 

3610 P09EA 6AD0 
PQ9ED OOBE 

3611 P09EC 0142 

3612 PD9ET? ODFE 

3613 F09EE 18FB 

3614 

3615 P09EF 1CF6 

3616 


IOS39 ADC 0 
CLR A 
LDQ =N191 

IOS395 STA I08UF2,Q 

SQZ I0S399 
IN'Q -1 
JM?» I0S395 
> EXIT 

IOS399 JMP» (I0S39) 

» 


ALL DONE 
LOOP 



o 


N8303607 

N8303608 

N83036Q9 

N33Q3610 

N83Q3611 

N8303612 

N8303613 

N3303614 

N8303615 

N8303616 

N8303617 


N8303619 
N33D362C 
M83G3621 
N8303622 
N8303623 
N8303624 
N8303625 
N8303626 
NS3ti3627 
N83G3628 
N8303629 
N830363D 
N33Q3631 
N83Q3632 
N8303633 
N83Q3634 
N3303635 
N 830 3 63 6 
N8303637 
N33Q363B 
N8303639 
N8SG364Q 
N8303641 
N8303642 
N8303643 
N8303644 

N83D3645 

N8303646 

N8303547 

N83D3648 

N83Q3649 

N3303650 

N8303651 

NS303652 

N8303653 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

n 


I0UPV4 
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OATEi 08/19/99 


3653 

3654 

3655 

3656 

3657 
365 8 

3659 

3660 

3661 
36 6 2 

3663 

3664 

3665 

3666 

3667 

3668 

3669 

3670 

3671 
367? 

3673 

3674 

3675 

3676 

3677 

3678 

3679 

3680 

3681 

3682 

3683 

3684 

3685 
3636 

3687 

3688 

3689 

3690 

3691 

3692 

3693 

3694 

3695 

3696 

3697 

3698 

3699 
370 0 

3701 

3702 


POAOl 

620D 


STA- 13, Q 

MSB 

P0AB2 

C2DC 


LDA- 12, Q 


P0AQ3 

AOIA 


AND- NZEP048 


P0A04 

88F7 


ADD^ IOS404 

10»“^4 VALUE 

P0A05 

620C 


STA- 12, Q 


PDAQ6 

C82A 


LDA» IOS40A 

CHECK RECORDS 

P0AQ7 

0131 


SAM IOS405 

SKIP IF YES 

PQA08 

1813 


JMP* I0S4Q7 

OTHERWISE OUTPUT MESSAGE 




CHECK CUOTIENr 


POA09 

C134 

IOS405 

LDA- \?37Q,I 


POADA 

0106 


SAZ IOS406 

SKIP IF ZERO 

POAOB 

58CD 


RTJ I0S36 


PQAOC 

FF80 




POADD 

0 0 00 


NUM 0 


PQAOE 

EE23 


LDQ^ IOS40Q 

MESSAGE BUFFER ADDRESS 

POAOF 

6208 

9: 

STA- 8,Q 

SAVE NN 

PQAIO 

18QB 

■Jf 

JMP» IOS407 


PDAll 

cooo 

IOS406 

LDA =N$202Q 

BLANK THE NN»32768 AREA 

P0A12 

2020 




P0A13 

6208 


STA— 8 , Q 


P0A14 

6209 


STA- 9,D 


P0A15 

620A 


STA- 1D,Q, 


P0A16 

620B 


STA- 11, Q 


P0A17 

C20C 


LDA- 12, Q 


PO A18 

AOGA 


AND- LPHASK9-8 


PO A19 

8030 


ADD- ONEBITs-13 

BIANO $2000 

POAIA 

620C 


STA- 12, Q 




'IL 

SET UP TO OUTPUT MESSAGE 



*r 

■If 

Q=MESSAGE 

BUFFER ADDRESS 




A=NBR OF 

WORDS 

POAIB 

OAIO 

I0S48 7 

ENA 16 


POAIC 

5816 


RTJ» I0S41 

OUTPUT MESSAGE 



IjC. 

RESET THE NN’®‘32768 AREAS 

PO AID 

C813 


LDA» IOS40A 


POAIE 

F813 


LDQ» I0S4DQ 

MESSAGE BUFFER ADDRESS 

POAIF 

012F 


SAP IOS408 

SKIP IF NOT APPLICABLE 

P0A20 

CQOO 


LDA =N$4E4E 

NN 

P0A21 

4E4E 





N8303654 

N8303655 

N8303656 

N3303657 

N3303658 

N8303659 

M8303660 

N8303661 

N8303662 

N3303663 

N8303664 

N8303665 

N3303666 

N8303667 

N8303668 

N8303669 

N8303670 

N83D3671 

N8303672 

N83Q3675 

N8303674 

N83D3675 

N8303676 

N8303&77 

N8303678 

N8303679 
N8303680 
N8303681 
N8303682 
N3303683 
N83Q3684 
N8303685 
N8303686 
N8303687 
N8303688 
N8303689 
N8303690 
N8303691 
N3303692 
N8303693 
N8303 694 
N8303695 
N8303696 
N8303697 
N8303698 
N8303699 
N33 03700 
N83Q37D1 
N8303 702 
N8303703 


T ni lo 


pflnF: B7 


date: 08/19/99 



N83Q3704 

N83Q3705 

N8303 706 
N3303707 

N8303708 

N8303709 

N83D371C 

N8303711 

M8303712 

N8303713 

N83Q3714 

N8303715 

M33Q3716 

N8303717 


N33D3719 

N8303720 

N8303721 

N3303722 

N3303723 

N83Q3724 

N8303725 

N83Q3726 

N83D3727 

N33D3728 

N33D3729 

N83Q3730 

N8303731 

N3303732 

N3303733 

N330 3734 

N8303735 

N8303736 

N83G 3 737 

N8303 738 

N8303739 

N8303 740 

N83G3741 

M83Q3742 

N8303743 

N830 3744 

N830 3745 

N8303746 

N8303747 

N8303748 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATES 08/19/99 



N33Q3749 


O 


N3303751 
N3303 752 
N3303753 
N3303754 
M8303755 
N8303756 
IF 1 N8303757 

N83D3758 
M33Q3759 
N83G376D 
N8303761 
N8303762 
N8303763 
N3303764 
N8303765 
M33037&6 
N83D3767 
N3303768 
N8303769 
N8303770 
N8303771 
N83Q3772 

N83G3773 
N 33 0 3 774 
N8303775 
N8303776 
N8303777 

N83D3778 
N8303779 
N3303780 
N83G3781 
N8303782 
N33D3783 
N33D378i- 
N8303 785 
N8303786 
N8303787 
N8303788 
N8303789 
63*^1383 N830379a 

63*1383 N8303791 

■63*1383 N33Q3792 

63*1383 N3303793 

63*1383 N8303794 

63*1383 N3303795 

63*^1383 N8303796 


O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


I0UPV4 


PAGE 89 


DATE: 08/19/99 


o 
o 
o 
o 
o 
o 
o 
o 
o 
, o 
o 
o 
o 
o 
o 

o 


3796 PQA6B 0A69 P 

3797 P0A67 IAEA 

3798 PQA68 1CF6 

3799 P0A69 554E 
PDA6A 4954 
P0A6B 3120 
P0A6C 3D20 
PDA6D 554E 
PQA6E 4954 
PDA6F 322C 
P0A70 2052 
P0A71 4541 
P0A72 4459 
P0A73 2046 
P0A74 4F52 
P0A75 2055 
P0A76 4E49 
PQA77 5432 
P0A78 202D 

380 0 P0A79 OBDO 
38 01 

3801 P0A7A 54F4 
3801 PQA7B 4C00 
3801 P0A7C 0A82 P 
P0A7D 0000 
3801 P0A7E 13FC 

3801 P0A7F 0017 
P0A80 0A90 P 

3802 P0A81 14EA 

3803 

3303 PCA82 54F4 
3803 P0A83 48D0 
3803 P0A84 0A8A P 
PBA85 0000 
3803 PGA86 18FD 
3803 P0A87 0001 

P0A88 07CF P, 
3804. P0A89 14EA 

3805 P0A8A 0161 

3806 P0A8B 18F6 
380 7 PO A8C EO 00 

P0A8D 0002 P 

3808 P0A8F 40FF 

3809 PDA8F 1C‘E9 
3610 PDA90 434F 

P0A91 5059 
P0A92 2043 
P0A93 4F4D 
P0A94 504C 
P0A95 4554 
P0A96 4544 
P0A97 2C20 
P0A98 432F 
P0A99 5220 


ADC I0S34M 
JMF- (ADISP) 
I0S3!i74 JMP» IT0S344) 
I0S34M ALF 16,UNII1 = 


MESSAGE ADR 
RETURN 

UNIT2, ready for UNIT2 - 


lOSgt NOP 0 , ^ . 

FWRITE $FC»IOS911,IOS91M,IOS91L,A,atO,I,,l 


IOS911 FREAO*^SFDTioS912,IOS342tl»A-,0,fltI, ,1 WAIT FOR C/R 


JHP- (ADISF) 
I0S912 SQP I0S913 
JMP» I0S911 
I0S913 LOO =XIO\/ 


SKIP IF NO ERROR 
ERROR, REPEAT 


STQ- 

JHP^ 

I0S91M ALF 


I RESTORE I 

{I0S91? RFTURN 

»,C0PY COMPLETED, G/R WHEN READY FOR 


NEXT COPY.^ 


63=^1383 N8303797 

53'*^1383 N3303 798 

63=*^1383 NB3C3799 

63^1383 N830330D 


N'33038ai 

N33Q3802 


N8303303 

N83G3804 


N839 3 80 5 
N3303806 
N83038Q7 
N83Q3808 

N3303809 

N830381D 

M8303811 


O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 

o 

o 

o 

o 
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PDA9A 5748 
P0A9B 454E 
P0A9C 2052 
P0A9D 4541 
P0A9E 4459 
PuAPF 2046 
PQAAQ 4F52 
POAAl 204E 
P0AA2 4558 
P0AA3 5420 
P0AA4 434F 
P0AA5 5059 
POAA6 2£20 

3811 0017 I0S91L EQU 103 9 1 LI ^-lOS 9 1 M ) 



DATEl 08/19/99 



O 

o 

o 

o 

o 

o 

o 

o 

o 


o 

□ 

o 

o 

o 

N83Q3812 

O 

o 

O 

o 

o 

o 

o 

o 

o 

o 


C) 
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DATE! 08/19/99 


o 

n 

O 

o 

o 

o 


3813 NO CODE MAY BE ADDED AFTER THIS POINT 

3814 

3815 P0AA7 0000 I0S42V NUM 0 

381 fi * 

3817 P0AA8 2020 NUM $2020 

3818 0AA9 P I0BUF2 EQU I0BUF21*> START OF 10 BUFFER APEA 

3820 END I0UPV4 


PGM= 0AA9 t 27295 COM = 0000 I 05 DAT = 0000 ( 05 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


»»»» 63^1383 N3303814 

N3303815 
N83Q3816 
N8303817 
N3303818 
N3303819 
N83Q3820 
N8303821 


c 

o 

o 

C) 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATE 


08/ 19/99 


EQUIVALENCES 


DEF.LTNE 

NAME 

VALUE 


REFERENCED AT 

LINE 1 

NUMBER 













0 000 

I 

QOFF 

1 0 00 2551 

0 255, 

0A41, 

1862, 

2165, 

2276, 

2 446, 

2515, 

2647, 

2693, 

2850, 

2980, 

3121, 

3161, 

3209, 

3270, 

3330 


3426, 

3429, 

3 745, 

3772, 

3808 












0012 

0013 

THIAUC 

AMOMI 

OOEC 

D0F4 

10002361 
( D002441 

0256 

0274, 

0295, 

0 320, 

0337, 

0 365, 

1852, 

2155, 

2266, 

2346, 

2428, 

2502, 

2631, 

2839, 

2971, 

3108, 

3148 

3196, 

3255, 

3319, 

3729, 

3762, 

3790 









2846, 

2978 

0014 

ADISP 

0 OE A 

(0002341 

0 281, 

0 285, 

0302, 

0328, 

0 34:3 , 

0373, 

047 1 , 

1859, 

2162, 

2273, 

2353, 

2438, 

2512, 

2639, 

3116, 

3206, 

3265, 

3327, 

3 73 7, 

3742, 

3769, 

3797, 

3802, 

3304 





3133, 

3234 

0 015 

ZERO 

0022 

(0 00 03*+) 

0 6 0 6, 

0640, 

0o53, 

0 654, 

090 9, 

0910 , 

1537, 

1677, 

1947, 

2024, 

2034, 

2063, 

2064, 

2712, 

0 016 

ONEBIT 

0023 ■ 

(000035J 

0 477 , 

0 865, 

0867, 

0877, 

3882, 

0904, 

1G77, 

1112, 

1575, 

1667, 

1828, 

1837, 

1 918, 

1924, 

1943 , 

2018 

2 0 75, 

2152, 

2170, 

2173, 

2263, 

2285, 

2.494, 

286.7, 

2968, 

2985, 

3128, 

3172, 

3 282 , 

3355 , 

3369, 

3535 





3539, 

3 543 , 

3 546, 

3546, 

3575, 

3 68 5 








1187, 

1253, 

125 H 

0 017 

L PM ASK 

0002 

* 0000025 

0507, 

0 530, 

0560, 

0611, 

0833, 

0845, 

0960, 

0971, 

10 21, 

1039, 

1088, 

1131, 

1157, 

1286, 

1310, 

1385, 

1454, 

1480, 

2 081, 

2112, 

2137, 

2198, 

2240, 

2386, 

2496, 

2523, 

2577, 

2589, 

2651 





2 656, 

2784, 

2801, 

2928, 

2957 , 

3350, 

3684, 










0018 

NZERO 

0012 

<0000185 

Q.465, 

047*+, 

0 594, 

0599, 

3655 












0 019 

ZROBIT 

0033 

(10000515 

3316 
















0 023 

LINE 

0088 

< 0001365 

0 024 
















0 02ii 

LINLEN 

OOA3 

(0000675 

2614, 

2619, 

2625, 

2662, 

2 67 3 












0G2 5 

VOl 

0001 

<0000015 

0567, 

0585, 

0662, 

0760, 

1034, 

1076, 

1207, 

1214 





2131, 

2150 , 

2254, 

22b0 

GG26 

V02 

0002 ... 

r 000,0021 

Q 751 , 
2343, 
0752, 

1561, 
2 835 
2972, 

1 656, 

1664, 

1 698, 

1783, 

1795, 

1824, 

1849, 

1936 , 

2008, 

2014, 

0 027 

V03 

0003 ' 

<0008035 

2091, 

2111, 

2383, 

2797, 

2636, 

2897, 

2910, 

2965, 

2 9 8 Z f 

33 64, 

3759 




0 0 28 

V03Q 

002E ^ 

<QQ00‘+65 



3052, 

3 784 













0029 

V04 

0004 . 

<0000045 

1648, 

174 9, 













0 030 

VQ4Q 

QQ2F 

{ 0000475 

1644, 

1 745, 

.3 049 














0031 

V05 

000 5 

(0039055 

















0 0 32 

V05Q 

0030 

(0000485 

















0033 

V06 

0 00 6 

<0000065 

















0 G34 

V06Q 

0031 

<0 00 0495 

















0 035 

V07 

0007 

<0000075 

















0 036 

V07Q 

0 0 32 

(000 0,505 

















0037 

VO 7A 

0008 

10000085 

















0 038 

VO 8Q 

0033 

(DOOQ515 









1259 , 




.1635, 

1912, 


2061 

G039 

V08 

0029 

(0000415 

0524, 

0 528, 

0581, 

0626, 

0651, 

0767, 

0772, 

1079, 

1438 , 

IhH? f 

1497, 

1 974 , 

Z77U 

2782, 

2919, 

3523 









1937, 




0040 

V09 

00 0 9 

(D000D95 

0 450 , 

0492, 

0 502, 

D508, 

8593, 

0 610, 

0746, 

10 38, 

10 86, 

1279, 

1, 2 8 

1309, 

2079, 

2136, 

2197 



2239, 

2385, 

2576, 

2 588, 

2 650 , 

2 555, 

3349, 

3 531 









0 041 

VIO 

Q 0 0 A 

(0 00G105 

0 449, 

0 460, 

0 473, 

0489, 

0 499, 

0 950, 

1019, 

1 16 0 
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0 042 

Vll 

OGOB 

( ooaoii^ 

0 464, 

0 043 

V12 

oooc 

( 000012) 

0 848, 

0 0 44 

V13 

ODOD 

1 000013) 

Q 445 , 

0 045 

\fl4 

QOOE . 

( 0000149 

0 908 , 

0 0 46 

V15 

DOOF 

(000015) 

0551 , 

0 047 

V16 

OOID 

( 0 00016) 

0 847, 

0 0 48 

yi7 

0011 

( 0G0017) 

2 778, 

0 0 49 

V18 

0012 

1 Q00018) 

1015, 

0 050 

V18Q 

002D 

(Q 000459 

1016, 

0 051 

V19 

U013 

(0000199 

0 595 , 

00 52 

y20 

0014 

(0000209 

1018, 

0 053 

yzi 

0015 

(0 000219 

0531, 

0054 

V22 

0016 

(0000223 

1 425 , 

0 055 

y23 

0017 

(0QQ0239 

0 6 0 5, 

0056 

W24 

0018 

(0000249 

0620, 

0 057 

1/2 5 

0019 

(0000259 

0617, 

C 05B 

y26 

DOIA 

(0000269 

1522, 

0 059 

y27 

DOIB 

(0000279 

1523, 

GO 60 

y28 

OOIG 

(0000289 

0061 

V29 

OOID 

( 00Q029) 

1525, 

0 062 

y30 

OOIE 

(000030) 

0747, 

0063 

V3i 

OOIF 

(0000319 

1514, 

3097, 

0 064 

V32 

0020 

(0000329 

0264, 

00 65 

y33 

0021 

(0000339 

1555, 

2882, 

0 066 

y34 

0022 

(0000341 

1515, 

0 0 67 

V35 

0023 

(0000359 

1 516, 

0 068 

V36 

002 4 

{ 0000369 

1517, 

3281, 

0 0 69 

V37 

QC25 

(0000379 

1470 , 
3362, 

0 070 

V38 

0026 

( 000038) 

1520, 

0 071 

y37Q 

0Q3 4 

(0000521 

1478, 

0072 

y39 

0027 

(0000399 

1506, 

0 073 

V40 

0028 

( 0000401 

0 63 7, 

0 07ii 

y42 

002A 

(0000^29 

3 543, 

0 0 75 

V43 

0D2B 

(0000439 

0 7 92, 
2 751, 

0 077 

W44 

00 2C 

'( 000Q44J 

, 0827, 

0 078 

V53 

0035 

(0 000539 

1 66 7 , 

G 079 

yABUF 

0036 

(0000549 

0 262, 

0 0 8 0 

yOBL 

8037 

(0000559 

0 2 69, 

0 081 

VVBUF 

0 03 8 

( 0000569 

0266, 

3811 

I0S91L 

0017 

(000023) 

3801 




DATE*. 

0 8/19/99 



0 49 0 » 

050 0 , 

0951, 

1156, 

1162 


2552, 

0 952 , 

1166, 

1239, 

2384, 

2389, 

2391, 

0903, 

0911, 

0912, 

0953, 

0976, 

0988, 

1026, 

0 918, 

0922, 

0957 




3544, 

0555 , 

0902, 

0961, 

0967, 

3517, 

3536, 

0357, 

2792 

0872, 

0883, 

0884, 

0954, 

0974, 

2594, 
1145 , 

1072, 

1113, 

1124, 

1125, 

1132, 

1143, 

1 13 0, 

1218 




1052, 

1091, 

0 60 0 , 

0612, 

0642, 

102 2, 

1047, 

113 7, 

1146, 

1150, 

1255, 

1318 



0568, 

0663 






2166, 

2273, 

3170 





0609, 
0 647 

153 6 



3 756, 

3781 


2390, 

2422 

2392, 

2585, 

2 681, 




2 423, 

2485, 

2486, 

2571, 

2572, 

2727, 

3067, 

1615, 

3190, 

3223, 

3224, 

3 290, 

3295 

2032, 

0749, 

1513, 

1675, 

1875, 

1881, 

1945, 

1577, 

1578, 

1688,. 

1836, 

1838, 

1925, 

1941 , 

3174, 

3230, 

3314 




3570 

1554, 

1692, 

1934, 

2877, 

2881, 

3100, 

1588, 

1610, 

1693, 

1715, 

1935, 

1944, 

1951, 

3011, 

3020, 

3135, 

33D6, 

3363, 

3571 


1576, 

1584, 

1709, 

1822, 

1843, 

3279 


158^, 

1622, 

1952, 

2 885, 

31-8 7, 

3216 


1589, 

1623, 

1716, 

1953, 

2 037, 

2168, 

2172, 

3283 , 

3354, 

3363 




1997, 

1475, 
3 63 5 
1791, 

1481, 

1518, 

1649, 

1 750, 

1774, 

1812, 

2127, 

2236, 

2404, 

2470, 

2762, 

1519, 

1645, 

1746, 

1769, 

1993, 

2405, 

3050, 

2114, 

2334, 

2603, 

2607, 

2620, 

2664 

2740 

1266, 

1738, 

2376, 

2462, 

2527, 

2538, 

1381, 

1614, 

3641 




1742, 

1 37 6 , 

1472, 

1 59 6, 

1 ShI , 

1 668, 

1723, 

2769, 

2859, 

3047 





0632, 

0849 





2 54 7, 

1792, 

2406, 

2464, 

2467, 

2 478, 

2543, 

0 442, 

0958, 

1206, 

1526, 

2556, 

2-701, 

2955, 

G 429, 

1676, 

1876, 

1946, 

2033, 

2420, 

271 1 , 

2890, 

3024, 

3479 






2593, 2601 
1136 


3576 

2616, 

2624, 

2626, 

2668, 

2672, 

2 675 

1215 

1101, 

1111 , 

1158, 

1179, 

1186, 

1240, 1273, 1291 


3068, 

3252, 

3291 






2448, 

2030, 

2706, 

2128, 

2 70 7, 
2495, 

2726, 

2554, 

3229, 

2687, 

3241, 

2888, 

3286 

2984, 

2986 

2026, 

2031, 

2036, 

2216, 

2498, 

2560, 

2874, 

2878 

2280, 

2284, 

2457, 

2491, 

2713, 

2754, 

2883, 

3185 

2126, 

2235, 

2403, 

2765, 

2 930, 

2932, 

3053, 

3347 

3358, 
3 665 

3 360, 

3638 






1764, 

1799, 

1955, 

1987, 

2038, 

2396, 

2558, 

2697 

2 695, 
3023, 
3233, 

2736, 
3188 
323 6, 

2746, 

3249 

2916, 

3060, 

3787 




ICUPV4 


o 

o 

S Y M B 0 

L S 



DEF,LINE 

NAME 

ADDRESS 

o 

0 0 8 6 

I0UPy4 

00 OG 


0 096 

lOV 

0002 

o 

0 097 

loyoi 

UQD3 


0 098 

lOVL 

0Q3C 


010 6 

lOTOl 

DQ3D 

o 

0154 

IOT02 

0059 

0186 

I 01 03 

DQ75 


0 225 

IOT04 

0091 


0230 

IOT04T 

0098 

o 

0235 

IOf05 

0099 

0243 

IOT05A 

OOAO 


0 254 

lOfl 01 

OOAl 


0 257 

BUFST 

00A5 

o 

Q27t^ 

lOOlO 

D0B7 

0275 

lOlOO 

O0B8 


0277 

10105 

OGBA 


0278 

10106 

OOBB 

o 

0 283 

10120 

OOBF 

0285 

10125 

• OQCl 


0 289 

10130 

00C2 


0295 

10131 

G0C9 

o 

0298 

10135 

•OQGC 

0299 

10136 

OOCD 


0 304 

10140 

OODl 


0313 

10150 

0004 


0315 

10151 

0006 


0320 

10152 

QODB 


0323 

101 55 

OODF 


0324 

10156 

QGOF 

o 

0 330 

101 69 

0QE3 

0334 

10165 

00E6 


0 33 7 

10167 

00E9 


0 341 

10168 

flOEO 

o 

0 347 

10169 

OOFl 

0351 

I017Q 

DDF5 


0357 

1020 0 

G0F6 


G 361 

10210 

00F8 

o 

0363 

10220 

00F9 

0366 

10222 

OOFB 
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REFERENCED AT 
0 0 86 

0 254» 0 412» 
3329, 3744, 
0414, 0416, 
1505, 1767, 
0096 

0 5G6, 0 51.3 
0529, 0562, 
0 652, 2062 
•3 5 97, 0 60 8 
0604 
0 243 
0639 
0 094 
0260 
0272 



DATEi 

08/19/99 











o 















o 















o 

LINE 

NUHBER 













o 

0440 , 

1861, 

2164, 

2275, 

2445, 

2 514, 

2 646, 

2692 , 

2849, 

2979, 

3120, 

3160, 

3208, 

3269 


3771, 

3807 ■ 












1453 


0 418, 

0429, 

0616, 

0619, 

0786, 

121 6, 

1219, 

1241, 

1343, 

1358, 

1380, 

1394. 

1423, 

o 

1773, 

1813, 

1876, 

1917, 

1991, 

1996, 

2791, 

2955, 

3023, 

3024, 

3479, 

3 562 



1080, 

2783, 

2786 












o 















o 


O 


0 283 
0 276 
0306, 

0332, 

0377 

2219, 2360 , 2 531, 2820, 2944 

O 

0284, 
0 2 93 

0379, 

1405, 

o 



0 304 
0297 
0273, 
0 318 
0316 

0294, 

0305 



o 

Q 33G 
Q 322 
0 331 




o 

0 347 
0339 
0336 




o 

0454 

0665, 

0358 

1097, 

1333, 

2078 

o 


O 


O 


o 


o 


o 


o 
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DATE! 08/19/99 


0368 

10225 

OOFD 




0369 

10226 

QQFE 

0 3 43 , 

0 37 5 


0 371 

10227 

0100 

0 363 



0 375 

10235 

0102 

0 367 



Q 379 

10240 

010 5 

0 376 



0383 

lOMSl 

DIO 6 

0 402 



0386 

IOMS2 

0111 

0 403 



0389 

I0MS3 

one 

0280 



0 392 

I0MS4 

0122 

0301 



0 395 

IOMS5 

0127 




0 399 

I0HS7 

012A 

0 404 



0 402 

lOMSlL 

0135 

0 357 



0403 

IOMS2L 

013 € 

0361 



0 40 4 

I0MS7t 

0137 

2 524, 

2 92 6 


0405 

T0HS81_ 

0138 

2217 



0 412 

roBoo 

0139 

Q 3 51 



0 418 

IOB02 

0142 

0 424 



0428 

IOB04 

014A 

0 423 



0 429 

10805 

014B 

0432 



0 440 

lOBlOO 

015 0 

0 430 



0452 

IOB1D2 

015D 

0 448 



0454 

IOB105 

015F 

0 447, 

D 482, 

0515 

0 460 

lOBllO 

0160 

0 453 



0 473 

lOBlll 

016A 

0 462 



0 482 

I0B112 

0171 

0 467 



0 489 

I0B113 

0172 

0 478 



0 499 

IOB115 

0178 

0 476 



0 505 

I0B122 

0170 

0 451, 

0494 


0 506 

I0B124 

017E 

0520 



0 519 

I0B125 

0137 

0 514 



0 524 

IOB130 

0189 

0 5 09 



0547 

IOB20Q 

0197 

0 667 



0 551 

TOB210 

0199 




0555 

1 0 B 22 5 

019D 

0 553 



0567 

IOB230 

01 A 5 

0 556, 

Q 55 8 , 

05 61 

0589 

I0B231 

CIBO 

0 577 , 

0 583 


0593 

I0R232 

OlBl 

D 5 69 t 

.0 587 


0597 

I0R235 

0185 

0 6 0 3 



0 604 

I0B237 

OIBD 

0 598 



0 607 

I0B24Q 

OlCl 

G 6 0 1 



G 626 

IOB250 

0103 

0614 



0640 

I0B252 

OlDC 

0645 



0646 

IOB255 

01£2 

0 6 43 



0648 

IOB257 

01E4 

0621 , 

0 62 8 , 

0 631 

0 6 62 

IOB260 

OlED 

0 554 



0 665 

IOB270 

OlFO 

0 562 , 

0 589 


0667 

IOB280 

01F2 

0 6 64 



0 673 

IOB300 

01F3 

0194, 

0 199 


0 682 

IOB305 

DIFB 

0706 



0686 

IOB310 

OlFF 

0717, 

0 72 4 


0 692 

IGB315 

0204 

0192, 

0193, 

0196, 0197, 0198, 0200 

0 695 

IOB320 

020 7 




0700 

IOB330 

020A 





o 
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Q 

0 70 8 
8 712 

I0B34Q 

IOB350 

0 210 
0213 

0 206 


0715 

T0B352 

0215 

0698 

O 

0719 

I0B355 

0219 

0188, 

0725 

I0836Q 

0220 

0205, 


0 72 9 

I0B362 

0223 

0203, 


0 733 

I0B365 

0225 

0727 

O : 

0 746 

IOB370 

0229 

0 690, 

0 755 

I0B37A 

0 231 

0750, 


0 760 

T0B371 

0233 


0 772 

I0B377 

0238 

0769 

O 

0 784 

I0B372 

0241 

0776 

0 786 

T03373 

0242 

0774, 


0 792 

I 08374 

0248 

0756, 


0799 

108375 

024D 

0795 

O 

0801 

IOB900 

Q24F 

0 677, 

0 826 
0627 

lOSl 

TOSIA 

0250 

0251 

0888, 


Q 842 

lOSlD 

025B 

0 837 

O 

0845 

lOSlE 

025D 

0 840 

0865 

I0S14 

026A 

0.854, 


0 867 

I0S15 

026C 

0 856 


0872 

I0S16 

026E 

0 861 

o 

0 877 

I0S17 

0273 

0874 

0 882 

I0S18 

0275 

0 8 76, 


0 883 

I0S19 

0276 

0 866 , 


0890 

lOSlV 

0279 

0830, 

o 

0901 

I0S2 

027A 

8923, 

0 907 

I0S2B ■ 

0280 

0 9 0 5 


0920 

I0S26 

028A 

0914 


0923 

IOS261 

0 280 

0 919, 

o 

0 945 

I0S3 

0 28 £ 

0 444, 

0 958 

I0S3A 

0298 

0984 


0964 

I0S3B 

029F 

0962 


0 988 

I0S3C 

02AD 

3 9 65, 

o 

0990 

t0S30 ■ 

02AF 

Q 9 75 , 

0995 

I0S3E 

02BO 

0963, 


1013 

I0S4 

Q2B1 

10 74, 


1034 

I0S41N 

028F 

1028 

o 

1044 

I0S41A 

02C7 

1041 

1047 

I0S41B 

0 2C9 

1036, 


1 Q52 

I0S41C 

02CD 

10 49 


1064 

I0S41I 

0205 

1054 

o 

1067 

I0S41L 

0207 

1057 

1070 

I OS 41 P 

0209 

1060 


1072 

I0S41S 

02DA 

10 65, 


1076 

I0S41W 

02DC 

IQ 42, 

o 

1086 

I0S43 

02E4 

10 81 

1097 

I0S44 

02EF 

0990, 


1101 

I0S44A 

0 2F1 

10 90 


1111 

I0S45 

02F7 

1093, 

o 

o 

1120 

I0S46 

02FB 

1029, 

1136 

I0S46A 

0,30 2 

1129 


O' 

date: 08/19/99 

P'-T 
; i 


0189, 
0 20 7, 
0 204 

0190, 

0208 

0191, 

0195 

o 

0711 




o 

0 753 





0 778, 
0 770 , 

0780 

0789 



o 

0696, 

0959 

070 4, 

0709, 

0713, 0722, 0726, 0 730, 0794 

o 

0859 




o 

0 878 
0 86 8 
0835 
0 979 




o 

o 

0921 
0 995, 

12D8 



o 

0969, 

Q978 

0989 

1114, 

0972 

1139, 

1213 


o 

1044 




o 





o 

1068 

1045 




o 

1062, 

1106, 

1193 


1 095, 
1050 , 

1103, 

1082, 

1105 

1159 


o 


o 


O 


O 
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date: 08/19/99 


10547 

10548 

10549 
I0S4A 
IOS4B 
I0S4C 
I0S4D 

1055 
IOS59 

1056 

1057 

10571 
IOS71A 
I0S718 
I0S71C 
I0S71D 
I0S7rE 

10572 
IOS72A 

10573 
I0S73A 

10574 
I0S74L 
T0S74P 
I0S74C 
I0S74M 

10578 

10579 

1058 
IDS 85 

1059 
I0S99 
TOSIO 
IOS102 
IOS104 
IOS106 
lOSlOV 
IOS107 
I0HS13 
lOMSDL 
I0S12 
ALOGl A 
lOSA 
I0SA02 
IOSA03 
lOSAOl 
IOSA05 
lOSAO 4 
lOSB 
IOSB05 
lOA 
I0AQ5 
lOAlQ 


030 5 
0306 
0311 
0314 

0316 

0317 
0319 
Q31B 

0324 

0325 
0335 
0340 
034A 
034D 
0350 
0352 
0354 
0356 
035A 
Q35D 

0363 

0364 
Q36D 
036E 
036F 
0370 
0372 

0374 

0375 
037B 
037C 

0381 . 

0382 
038A 
038F 

0393 

0394 

0395 
039 B 
Q3A8 
03AG 
0382 
03B3 
038 A 
03B8 
03BF ' 
Q3C5 
03G6 
03C7 
030 0 
0 3D1 
0302 
0308 


1133 

1161 

1152 

1153 
1167 
1155 
1120 
1182 
0 5 47 
Q 650 
1247 
1261 

1267 
1317 
1275 
1280 

1268 
1293 
1300 
1312 
1287 


, 1164 


1188 


, 1223 

, 0 684, 0683, 0735, 1335 
,1248 


1295 


, 1305, 1315 


1324 

1320 

1322 

12 49, 

1262 , 

0674, 

1345, 

0560 , 

1359 

0797, 

1368 

1382 

1377 

1375, 

1336, 

1413 

1402 

1427, 

1246, 

1459, 

1441 

1443 

1449 

1445 

1457 

1483, 

1473 ^, 

0799 

1 501 

1498 


1326, 1349, 136Q 
1331 

0693, 0701, 0720, 1347 
1346 

0716, 1361 
1396 


1393 

1395, 1618 

1532, 2057 ^ 

1250, 1424, 2599, 2798, 3382 
1463, 1760, 18B7, 2 75 8, 2810 

1566, 1718, 1793, 1969, 2047, 2472, 2534, 
1476 


o 


, 

L/' 

O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 


o 


o 

o 
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1 512 

I0A15 

03DD 

1 496 

1521 

I0A20 

0326 


15A1 

lOAT 

03F3 

1495t 

1 BSh 

lOG 

03FA 

0 Z2ht 

1563 

IOG50 

0 403 

1559 

156A 

lOClOO 

0 40 4 


1566 

lOCllD 

0405 ' 


1570 

I0C115 

0407 


1 583 

IOC140 

040F 

1 571 

1587 

IOC150 

0411 

1 579 

160 8 

IOC160 

041B 

1 598, 

1620 

T0C175 

0 428 

1 599 

1621 

I0C177 

0 42 A 

160 4 

1648 

I0C178 

,043 7 

1 642 

1 652 

I0C179 

043A 

1 637 , 

1656 

IOC 18 0 

0 43E 

1564 

1667 

IOC190 

0 442 

1 6 50 , 

1 674 

I0C195 

0447 

1 669 

1687 

lOM 

0450 

0 226, 

1692 

lOHlO 

0452 

1755, 

1703 

I0W12 

045D 

1697 

1723 

IOH15 

0465 


1732 

I0M16 

046 A 

17 24 

1 734 

I0M17 

0468 


173 8 

I0M14Q 

046D 

1727 

17 49 

I0H142 

0474 

17 43 

1755 

I0H145 

0478 

1 747, 

1760 

1011147 

0 479 

1741 

1 764 

I0H148 

047C 

1810 

1773 

IOM150 

0484 

17 65 

1777 

I0M155 

0488 

1771 

1779 

I0H173 

0489 

1 7 75 , 

1783 

I0H175 

04,8 A 

1704 

1791 

I0M176 

0490 

1785 

1805 

1011177 

049D 

1800 

1807 

I0M17 8 

0 49E 

180 3 

1 B12 

I0M179 

04A2 

1808 

1818 

I0M17A 

Q4A7 

1814 

1822 

I0M181 

G4A 8 

1 767 

1824 

I0M182 

04AA 

1830 , 

1827 

I0H183 

04AD 

1786 

1832 

IOM16A 

0 4B 1 

1829 

1836 

T0M184 

0 482 

1823 

1855 

I0M186 

0 4B C 


1 856 

IOM185 

0480 

1850, 

1861 

I0M188 

0 4C0 

18 54 

1868 

I0M1S9 

04.C6 

1865 

1873 

IOM190 

0 4G7 

1805, 

1881 

IOM195 

0 401 

1 878 

1891 

rOHS6 

0 40.3 

1 894 

1894 

IOMS6L 

04OE 

1 796 

1907 

lOP 

D40F 

0228, 

1912 

lOPlO 

Q4E4 

1909 


DATES 08/19/99 



, O 

1504 

0236, 1652 

■ o 


■ o 

1617, 1732, 1958, 2041 

: o 

1646 

; O 

1662, 1753, 1779, 2049 

0^3^ 

1762, 1777, 1818, 1868 

o 

„ 

' o 

1 751 

; 

1816, 1 832 

: 


: O 

1866 , 

: O 

1864 

■ O 

1 885 

O 

0 240 

o 


o 


o 


o 


o 
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DATE: 08/19/99 


1917 

IOP20 

0 4E9 

1915 


G 


1924 

IOP3D 

0 4F0 

1920 



1925 

IOP40 

04F1 

1910, 

1922 


o 

1927 

T0P5D 

D4F2 

1982 , 

200 0 

O 

1 938 

I0P55 

D4FD 

1932 



1944 

lOPlQO 

0502 

1942 



196? 

I0P1D5 

05DD 

1956 



O 

1965 

I0P1D7 

0510 


O 

1969 

lOPllO 

0512 

1963 



1973 

I0P115 • 

0514 





1983 

I0P12Q 

051E 

1977 



O 

1984 

I0P124 

051F 

1976, 

1981 

o 

1985 

I0P128 

0520 

1979 



1987 

IOP130 

0521 




1996 

I0P132 

0529 

1988 



O 

2000 

I OP 13 5 

0520 

1994 


o 

20 02 

IOP140 

052E 

• 1998 



20D8 

IOP150 

052F 

1939 



2017 

IOP155 

0 53 6 

2010 



O 

2030 

IOP157 

0545 

2019, 

2028 

o 

2043 

I0P15A 

D550 

2039 



2G4 6 

IOP159 

0553 





2047 

I0P15B 

0555 

2044 



o 

2049 

IOP160 

0557 

2002, 

2029 

o 

2 056 

lOT 

0559 

0230 



2072 

lOTlOO 

0566 

0210, 

0211, 

0212, 0213 


2078 

IOT105 

056B 

2073, 

2107 


o 

2079 

IOT106 

C56D 

2076 


: o 

2 085 

IOT107 

0 57 4 

20 83 



2 0 91 

lOTllfl 

0575 

0216 




2108 

I0T114 

0580 

2106 



O ; 

2111 

IOT115 

0582 

2095 , 

2099, 

2103 _ 

2114 

I0fll6 

0585 

2092, 

2109 

o 


2125 

lOTAFR 

0588 

2085 



2131 

IOT150 

058C 




o 

2144 

I0T154 

0594 

2139 


o 

2146 

I0T156 

0595 

2142 



2150 

IOT158 

059? 

2181 




2155 

IOT160 

0 59D 

2153 



o 

2158 

I0T161 

OSAO 



o 

2159 

I0T162 

0 5A 1 

2132, 

217 5 


2160 

I0T163 

I35A2 

2147 




2164 

I0T167 

0 5A4 

2157 



o 

2177 

I0T169 

C5B1 

2289 


0 

2179 

IOT170 

05B3 

2171, 

217 6 


2183 

I0T175 

0587 

2154, 

2174, 

2180 


2188 

lOf 230 

05B8 

2183 



o 

2197 

I0T235 

J3 5C1 

2305 


o 

2209 

IOT240 

05CE 

2200 



2214 

I0I245 

05D6 

2207 


2191, 2193, 2203, 2205, 2210, 2212, 2214, 2300, 2302, 2304 


2223 

I0MS8 

05DE 

0405, 

2189, 

o 

2234 

lOTBFR 

05E9 

2 084 


o 

2239 

IOT3D2 

05EC 



o ■ 






o 


o 


o 
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DATE: Q8/19/99 


2249 

IOT304 

05F2 

2251 

I0T3Q6 

0 5F3 

2 260 

IOT307 

05F7 

2266 

IOT303 

05FD 

2269 

I0T3Q9 

0600 

2 270 

IOT310 

0601 

2271 

I0T311 

0602 

2275 

I0T31 6 

0 6G4 

2 29 0 

I0T318 

0612 

2299 

IOT320 

0616 

2315 

lOTUL 

0621 

2 320 

lOTREW 

0623 

2327 

lOTEOF 

0 62 5 

2334 

lOTSD 

0627 

2340 

IOT4Q0 

0 62 A 

2349 

IOT405 

0632 

2 35 0 

IOT406 

0 633 

2 351 

I0T4Q3 

0 63 4 

2355 

I0T415 

0 63 6 

2360 

I0T416 

0639 

2367 

lOPT J 

063B 

2376 

lOR 

063C 

23B1 

I0RTA6 

0642 

2383 

lORX 

0646 

2396 

lOROlA 

0650 

2 402 

lORGlQ 

06 53 

2424 

lOROl 5 

055C 

2428 

IOR020 

Q65D 

2 431 

lORB 

0660 

2 432 

lORC 

0661 

2434 

lORI 

0663 

2436 

lORD 

0665 

2441 

IOR030 

0 66 7 

2445 

IOR035 

066B 

2 462 

I0R35A 

0676 

2466 

TOR35B 

067 B 

2 476 

I0RC36 

0684 

2485 

TOR040 

0689 

2486 

IOR042 

Q68A 

2 495 

IOR050 

0690 

2 502 

lORObO 

0 694 

2 505 

lORE 

0697 

2506 

ICRF 

0698 

2507 

lORG 

0699 

2510 

lORH 

0 69C 

2514 

IOR070 

D69E 

2 523 

IOR072 

0 6A4 

2 531 

I0RQ73 

06AO 

2534 

IOR074 

06AF 

2538 

I0R74A 

06B1 

2 543 

IOR075 

06B5 

2 552 

IOR75A 

06BC 

2565 

IOR076 

06C7 


2242 

2245 

2293 

2264 



2255, 

2282, 

2283 

2 0 59, 
2268 

2252 


2283 

2265, 

0217 

2286, 

2292 

0214 

0215 
2115 
2314, 

2 321 , 

2328 

2344, 

2355 


2060, 

2348 

2335, 

2341, 

2356 
1 6B3, 

1726, 

1802, 

1679 

2379 

2377 

2380, 

2388 


2397, 

2728 

2 805 


2441 , 

2568, 

3064 

2421, 

2424 

2452 


2430 

2442 

2459 
2463 

2460 
2477 
2732 
2493 



2519 



2497, 

2487 

2562, 

2565, 

2504 

1 565 , 

2 528 
2 520 
2398 
2 539 
2 544 
2 559 

1825, 

2015, 


2 342 

1965, 20^3 , 2703 


2593, 2613, 2875, 
2177, 2358, 2444 


2961, 3010, 3063 
2645, 3275, 3776 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATEl 08/19/99 


o 

2576 

I0R76 


2 580 

T0R76A 


2585 

IOR77 

o 

2586 

I0R77A 

2 593 

I0R77B 


2 613 

I0R77H 


2619 

I0R77C 

o 

2 623 

I0R77P 

2 624 

IQR770 


2627 

I0R77E 


2 532 

I0R78 

o 

2 €34 

lORJ 

2635 

lORK 


2636 

lORL 

1 

2 637 

lORM 

o 

2643 

IOR090 

2646 

I0R095 


2 655 

I0RD96 

1 

2661 

IOR097 

o 

2668 

I0R97C 

2571 

I0R97A 


2 672 

I0RD93 


267 8 

IOR099 

o 

2661 

I0R99A 

2687 

lORiOQ 


2 692 

IOR120 


2 706 

I0R122 

' o 

2 717 

I0R125 

2725 

0MPSCT 


2732 

I0R13Q 


2 736 

I0R13X 

o 

2 740 

I0R131 

2744 

I0R132 

1 

2 751 

I0R135 

1 

2754 

I0R133 

1 © 

2758 

I0R139 

2762 

I0R136 


2 765 

I0R137 

' 

2769 

IOR140 

o 

2 774 

I0R141 

2778 

I0R145 


2790 

I0R146 


2 805 

I0R147 

o 

2810 

IOR190 

2813 

I0R193 


2816 

I0R194 


2819 

I0R195 

o 

2822 

rOMSll 

2825 

I0MS12 


2827 

I0MS8L 

{ 

2 828 

rOMSCL 

o 

o 

o 

2834 

I0S34 

2 839 

I0S34A 


06CF 
06D3 
0606 
06D8 
0 600 
06EB 
06F1 
0 6F5 
06F6 
06F9 
0 6 Ft 
070 0 

07 01 

0702 

0703 
070 5 
070 8 
0710 
0715 
0710 

0720 

0721 

0727 

0728 
072B 
D72E 
0 73 A 
0742 
0749 
0 74E 
3 75 0 
0751 
075? 
075B 

8 75F 
0763 
0767 
0769 
0 766 
0 77 0 
0771 
0 77 A 
0789 
078B 
073E 
0 792 
0 795 
0799 
07A9 
07B9 
07BA 
078 B 
0 7C1 


Cj 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

a 

o 

O 


o 
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DATE-: 08/19/99 


o 

O 

2847 

I0S341 

0 7C9 

2837, 

2 841 


□ 


2849 

I0S34B 

07C8 

2847 



2-8 52 

I0S342 

0 7CF 

2845, 

3803 



i O 

2853 

IOS343 

0701 



2854 

2865 

IOS34X 

IOR2QO 

0702 

0703 

0 290^, 
2465, 

2378, 2381, 2865, 2867 
2 540, 2743 


o 


2869 

IOR201 

0707 

2866 



o 

2881 

IOR202 

07DF 

2870 





2888 

IOR205 

0 7E6 

2 886 



o 


2890 

T0R2Q6 

07E7 

2879 




2901 

IOR21D 

0 7FO 




O 

2902 

I0R212 

07F2 

2 894 




2910 

I0R215 

07F7 

2904 





2916 

I0R216 

07FD 

2912 



u 


2919 

I0R217 

0800 

2917 




o 

2926 

IOR213 

0804 

2 913, 

2960, 2964, 2983, 2991 



8 9 3 4 

I0R225 

OBOE 

2529, 

2921, 3055 


o 


2 948 

lOHSAL 

0816 

2939 



2950 

rOMSiO 

0617 

2948 




o 

2955 

I0R228 

0827 

2914 




2961 

I0R229 

082E 

2959 



o 


2965 

IOR230 

0833 

2963 




2971 

I0R231 

083A 

2969 




o 

2975 

I0R232 

083E 

2966, 

2981 



2979 

I0R233 

0841 

2970, 

2 97 3 


o 


2984 

T0R234 

0847 

2982 



2989 

I0R235 

Q8 4C 

2895 




o 

2 998 

I0R236 

0855 

2993 




2999 

MFLG 

0856 

2907, 

2 992, 2994 


o 

1 

3 0 00 

lOHSPL 

0857 

2995 



3001 

lOHSP 

0858 

30 00 





3 010 

rOR250 

0866 

2908 , 

2998 




3020 

T0R255 

0 86 B 

3012 ' 


o 


3023 

IOR260 

0860 

3 0 43 




3030 

I0R262 

0 87 2 

2918 , 

3016 



o 

3 0 38 

rOR265 

0877 

3026 



3047 

I0R27Q 

087A 

2922, 

3034, 3042 


o 

' 

3 052 

I0R271 

087F 

3 0 48 



30 56 

IOR272 

0 8 83 

3051, 

3054 



o 

3069 

IOR275 

0692 

3059, 

3 0 61 



307 4 

I0?^S9 

0894 

3077 


o 


3077 

I0MS9L 

08 A 4 

3030 



o 

309 4 
3102 

IOS20 

IOS20K 

08A5 

08AD 

1562, 

1527, 

9rqJ’ 29G1, 2988, 3095, 3104, 3124, 3136, 3137 
2702, 2891 



3108 

I0S2A 

0881 



o 


3109 

I0S2BA 

D8B2 

3 0 96" 




3111 

I0S2D 

0BB4 




o 

3112 

T0S2E 

0 8 85 

2017, 

2927, 3099, 3122 



3113 

IOS2F 

08B6 

2022, 

3101, 3131 


o 


3114 

IOS2G 

08B7 

20 21, 

2025, 3103, 3130, 3134 



3120 

IOS206 

0889 

3110 



o 

3128 

T0S2G 7 

0 88F 

3123 




3136 

IOS209 

08C7 

3129 



0 0 

'O 










— 

- 


. . 




o 

1 


r ) 

I0UPV4 


o 

O 

O 

o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


3145 

I0S22 

08C9 

3 150 

I0S22 A- 

08CO 

3169 

I0S23 

08D3 

3177 

I0S239 

08DB 

3184 

I0S24 

. 08DC 

3199 

I0S24A 

08E7 

3 200 

I0S248 

Q8E8 

3 2D1 

I0S24C 

Q8E9 

3202 

T0S24D 

08EA 

3 203 

I0S24E 

Q8EB 

3204 

I0S24F 

08EC 

3 208 

I0S242 

08EE 

3215 

I0S243 

08F5 

3229 

I0S24K 

08FE 

3 241 

I0S244 

090A 

3248 

I0S25 

090C 

3257 

I0S25A 

0 913 

3258 

I0S24G 

0914 

3259 

I0S24H 

0915 

3 261 

I0S25C 

0917 

3263 

I0S25B 

0919 

3269 

I0S252 

0918 

3275 

I0S254 

0921 

3279 

I0S255 

0923 

3285 

I0S256 

0 92 8 

3305 

I0S27 

092E 

3317 

I0S279 

0 93 A 

3 320 

I0S27R 

093C 

3322 

I0S27A 

093E 

3323 

I0S273 

093F 

3324 

I0S27G 

0940 

3325 

I0S27C 

0941 

3329 

I0S272 

0943 

3339 

I0S277 

0949 

3345 

IOS30 

094A 

3 3 62 

IOS305 

0956 

3 3 63 

IOS306 

0957 

3368 

IOS308 

095A 

3 3 73 

IOS309 

095E 

3 380 

I0S33 

095F 

3394 

I0S33M 

096C 

3 AOl 

I0S33C 

0972 

3408 

I0S33P 

0 978 

3 413 

I0S332 

097C 

3414 

I0S333 

097D 

3 415 

I0S335 

097E 

3417 

I0S32A 

097F 

3422 

I0S35 

0980 

3 42 5 

I0S351 

0983 

3 4-:+3 

I0S36 

0980 

3 liJQ 

I0S36A 

09A9 

3476 

I0S37 

0 9AA 

3 479 

I0S375 

09AE 
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DATE 

151, 

146 

2261, 

2967, 

3162 

570, 

175 

3176, 

3177 

2046 

620» 

1 734, 

1962, 

210 

186, 

189 

191 

198 

211 

3219, 

3232 



3238 

1678, 


3240, 3242 


1879, 3239, 3299 


322Qi 3272 
0268, 3250 
3253 
3257 

3213, 3334 

3273 

3280 

2580, 3339 

3315 

3317 

3309, 3332 
3307 

3321 


3333 
2179 
3352 
3 3 61 
3356 
3365 
1660 
3 3 87 
3389 
5391 

3398 

3399 
3396 
3423 
1797 

3 4 24 
3 4 54 
2934 
3482 


■» 


, 


, 

♦ 

■I 


2290, 

3372, 

3373 

3370 

1784, 

2009, 

2911, 3413, 3414 


3 406, 

3411 




3403, 

3427 

3405, 

3410 

3436 


2 218, 

2525, 

2929, 


3447, 

3448, 

3468, 

3 643, 

3 668 

3458, 

3459, 

3467, 

3648, 

3652 

3056, 

3 483 





3415 


o 

o 

C) 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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DATEJ 

08/19/99 


3483 

I0S379 

09B3 

3481 






3515 

I0S38 

09B4 

1 558 , 

1696, 

1931 , 

2628, 

2893, 3313, 

3549 

3 521 

I0S381 

09B7 

3529 






3527 

I0S38B 

09BC 

3 524 






3 531 

I0S38A 

Q9BE 

3522 






3 543 

I0S382 

09C7 

3533, 

3564 





3548 

I0S383 

09CB 

3537 , 

3543, 

3545, 

3580 



3560 

I0S384 

0 9CD 

3525 






3569 

I0S385 

0903 

3563 






3 580 

IOS386 

09DA 

3577 






3 591 

I0S38T 

09OB 

3521, 

3561 





3607 

I0S39 

09£6 

1629, 

1 694, 

1927, 

3615 



3610 

I0S395 

09EA 

3613 






3615 

I0S399 

Q9EF 

3611 






3627 

I OS 40 

09F0 

14Q3, 

2819, 

2940, 

3032, 

3713 


3 63 8 

IOS401 

D9F7 

3 631 






3641 

TOS402 

G9F9 

3 633 






3 643 

TOS403 

09FA 

3636, 

3 63 9 





3644 

IOS404 

09FC 

3656 






3665 

I0S4Q5 

0A09 

3660 






3 677 

IOS406 

OAll 

3666 






3693 

IOS407 

QAIB 

3 6 61, 

3 675 





3713 

IOS403 

0A2F 

3780 






3715 

IOS40 A 

0A30 

3629 , 

3659, 

3698 




3 716 

IOS40Q 

9A31 

3628, 

3649, 

3671, 

3699 



3 724 

I0S41 

QA32 

2997, 

3 434, 

3694, 

3747 



3733 

T0S411 

0A3 9 

0349, 

3739 





3 734 

I0S412 

0A3A 

3 726 






3 735 

I0S413 

0A3B 

3 727 






3 739 

I0S414 

0A3D 

3731 






3 744 

I0Sh19 

0A4D 

3740 






3 754 

I0S42 

0 Ah4 

2468, 

2548, 

2 744, 

3788 



3760 

I0S421 

0 A48 

3785 






3 766 

IOS422 

0A4D 

3760, 

3774 





3771 

I0S424 

0A50 

3764 






5778 

I0S425 

0A57 

3775 






3788 

I0S429 

0A5E 

3779 






3789 

I0S344 

DA5F 

2838, 

3 79 8 





3798 

I0S3V4 

0A68 

3 792 






3799 

I0S34M 

0A69 

2853, 

3 796 





3800 

I0S91 

0 A7 9 

2804, 

3809 





3 3 03 

I0S911 

DA82 

3801, 

3806 





3805 

I0S912 

0A8A 

3803 






3807 

I0S913 

0A8G 

3805 






3810 

T0S91M 

OA90 

3801, 

3811 





3815 

IOS42V 

0AA7 

0257, 

3757, 

3778, 

3782 



3818 

I0BUF2 

0AA9 

0315, 

0326, 

0343, 

2508, 

2637, 3325, 

3610 



o 

o 

o 

o 

o 

o 

o 


o 

o 

o 

o 

o 

o 


o 

o 

o 


o 


o 


o 
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OATES 08/19/99 


C; 




c* 

o 

EXTERNALS 



o 

DEE. LINE NAHE 

VALUE 

REFERENCED AT LINE NUHBER 


o 

o ■: 

0090 LOGIA 

0091 MAXSEC 

03B2 

0190 

1429 
0 537 

O 




o 

O 




o 

O 




o 

O 




o 

O 




o 

O 




o 

O 
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O 
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o 




o 

o 




o 

o 




o 

o 




o 


O 


o 


o 
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DATES 08/19/99 


o 

/\ L 

P H A 

B E T I 

CAL 

SORT 

0 F 

S Y B 

0 L S 



o 

ADI SP 

0014 

ALOGIA 

1429 

AHONI 

0013 

BMPSCT 

2725 

BURST 

0257 

1010 5 

0277 

10106 

0 278 

I012Q 

0283 

10125 

0285 

10130 

0289 


10150 

0 313 

10151 

0315 

10152 

0320 

10155 

0323 

10156 

0324 


10169 

0347 

10170 

0 351 

10200 

0357 

10210 

0 361 

10220 

0 363 


10235 

0 37 5 

10240 

0 379 

lOA 

1 493 

IOA05 

1495 

lOAlO 

150 3 

o 

IOB02 

0418 

IOB04 

0 428 

10805 

0 429 

lOBlOO 

0440 

IOB102 

0452 


I0B113 

0 48 9 

IOB115 

0 499 

I0B122 

Q 505 

I0B124 

0506 

IOB12 5 

0519 


lOB 230 

0567 

I0B231 

0 589 

TOB232 

0 593 

■ 108235 

0597 

I0B23 7 

060 4 


106257 

0648 

IOB260 

a 662 

IOB270 

0 665 

IOB280 

0667 

IOB3QD 

0 673 

U 

lOB 330 

0700 

108340 

0706 

I0B35D 

0712 

I0B352 

0715 

IOB355 

0719 


I0B371 

0760 

I0B372 

0 784 

IOB373 

0786 

I0B374 

0792 

IOB3 7 5 

0799 


lOO 

1554 

lOClOO 

1564 

IOC 110 

1 5 66 

IOC115 

1570 

IOC140 

1 58 3 


I0C178 

164 8 

I0C179 

1652 

IOC 180 

1 656 

IOC190 

1667 

IOC195 

1674 

o 

lOM 140 

1738 

I0M142 

1749 

IOH145 

1755 

I0M147 

1760 

IOH148 

1764 


I0H17 

173 4 

I0M173 

1779 

IOH175 

1783 

I0M176 

1791 

IOM177 

180 5 


I0H182 

1824 

IOH183 

1827 

1011184 

1836 

IOM1S5 

1856 

I0M186 

185 5 


I0M19 5 

1881 

I OH SI 

0 3 83 

lOMSlQ 

2950 

lOMSll 

2822 

I0MS12 

2825 

o 

I0MS3 

0389 

I0MS4 

0 392 

IOMS5 

0395 

I0MS6 

1891 

I0I'1S6L 

1894 


1 0 M S 9 

3074 

I0MS9L 

3077 

lOHSAL 

2948 

T0MS8L 

2827 

I OH SC L 

2 82 8 


lOPl 0 

1912 

lOPlDO . 

1944 

IOP105 

1962 

IOP107 

1965 

lOPllQ 

1969 


IOP130 

1987 

I0P132 

1996 

IOP135 

2000 

IOP140 ■ 

20Q2 

I0P15S 

2008 

o 

I0P15B 

2047 

IOP160 

2049 

TOP20 

1917 

I OPS 0 

1924 

IOP40 

1925 


lORQ 1 5 

242 4 

lORQlA 

2396 

IOR020 

2428 

I0R030 

2441 

IOR035 

2445 


lOR 060 

250 2 

IOR070 

2 514 

IOR072 

2 523 

IOR073 

2531 

IOR074 

253 4 

o 

IOR096 

2 65 5 

IOR097 

2661 

IOR098 

2 672 

IOR099 

2678 

lORlOD 

2687 

I0R131 

2 740 

I0R132 

2 744 

IQR135 

2 751 

I0R136 

2762 

I0R137 

2765 


I0R141 

2774 

I0R145 

2 778 

I0R146 

2790 

I0R147 

2 80 5 

I0R19S 

2 81 0 


I0R201 

2869 

IQR202 

2881 

IOR205 

2883 

I0R206 

2890 

IOR210 

2901 

o 

I0R218 

2926 

I0R225 

2934 

IOR228 

2955 

I0R229 

2961 

IOR23C 

296 5 

I0R235 

2989 

I0R236 

2998 

IOR250 

3010 

I0R255 

3020 

IOR260 

3023 


lOR 272 

3056 

I0R275 

3 0 69 

IOR35 A 

2462 

I0R358 

2466 

I0R74A 

253 8 


I0R77A 

2588 

I0R77B 

2 593 

IOR77C 

2619 

IOR77D 

2 62 4 

I0R77E 

2627 


I0R97C 

266 3 

I0R99A 

2681 

lORB 

2431 

lORC 

2432 

lORD 

243 6 

o 

lORI 

2434 

lORJ 

2 634 

lORK 

2635 

lORL 

2636 

lORM 

2 63 7 


lOSlO 

1374 

I0S1S2 

1382 

IOS104 

1393 

IOS106 

1396 

IOS107 

1401 


I0S16 

0872 

I0S17 

0 877 

I OS 18 

0 882 

I0S19 

0 883 

lOSlA 

0 827 

o 

lOS 20 

309 4 

I0S2£16 

3120 

IOS207 

3128 

I0S209 

3136 

IOS20K 

3102 

I0S24 

3184 

I0S242 

3208 

I0S243 

3215 

I0S244 

3 241 

I0S24A 

3199 


I0S24F 

320 4 

I0S24G 

3258 

IOS24H 

3259 

I0S24K 

3229 

IOS25 

3248 


I0S25A 

325 7 

I0S25B 

3 263 

IOS25C 

3261 

I0S26 

0920 

IOS261 

0923 


I0S27A 

3 32 2 

I0S27B 

3323 

I OS 2 7 C 

3325 

I0S27G 

3324 

I0S27R 

3320 


I0S2E 

3112 

I0S2F 

3113 

I0S2G 

3114 

10 S3 

0945 

IOS30 

3345 


I3S32A 

3417 

IQS33 

3380 

I OS 3 3 2 

3413 

I0S333 


I0S335 

3415 


105 341 

2847 

I0S342 

2 852 

IOS343 

2 8 53 

I0S344 

3789 

I0S34 A 

2839 


lOS 351 

3425 

I0S36 

3 443 

I0S3&A 

3470 

I0S3 7 

3476 

IOS375 

'347 9 

u 

I0S383 

3548 

I0S3 84 

3560 

IOS385 

3569 

IOS386 

3580 

IOS38A 

3531 


103399 

3615 

I0S3A 

0 958 

IOS38 

0964 

IOS3G 

0 988 

I0S3D 

099 0 


lOS 401 

363 8 

I OS 40 2 

3 641 

IOS403 

3643 

IOS404 

3644 

IOS405 

3665 

n 

I0S4CQ 

3716 

I0S41 

3 724 

I0S411 

3733 

I0S412 

3734 

IOS413 

373 5 


o 


O 


G 

o 


I 

0000 

10001 

0254 

lOQlfl 

0 274 

lOlOO 

0275 

o 

10131 

0 29 5 

10135 

0298 

10136 

0 299 

I014Q 

0304 
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